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ABSTRACT 


Land  mines  are  a  continuing  threat  to  the  mobility  required  by  the  modern 
army.  Efforts  to  develop  solutions  for  the  problems  presented  by  mines  are  hampered 
by  a  lack  of  useful,  realistic,  high  resolution  models. 

To  assist  in  developing  the  needed  modeling  capabilities,  several  methodologies 
are  proposed.  Methodologies  for  modeling  vehicle  navigation  error,  mine  encoimters, 
plow  displacement  of  mines,  bypassing  obstructions  and  the  presence  of  overwatching 
direct  fires  are  developed  and  explained.  These  methodologies  are  then  implemented 
using  SIMSCRIPT  and  SIMGRAPHICS  into  a  minefield  breaching  model.  The  model 
can  be  run  in  a  graphics  mode,  allowing  a  visual  validation  of  the  model  algorithms. 

The  problem  of  plow  width  versus  breaching  force  casualty  rates  is  examined 
as  an  example  of  the  potential  utility  of  the  model. 


THESIS  DISCLAIMER 


The  reader  is  cautioned  that  computer  programs  developed  in  this  research  may  not 
have  been  exercised  for  all  cases  of  interest.  While  every  effort  has  been  made,  within 
the  time  available,  to  ensure  that  the  programs  are  free  of  computational  and  logic 
errors,  they  caimot  be  considered  validated.  Any  application  of  these  programs 
without  additional  verification  is  at  the  risk  of  the  user. 
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I.  INTRODUCTION 


Currently,  the  Army’s  countermine  capability  is  inadequate.  Efforts  to  address 
this  shortfall  have  been  ongoing  since  the  early  1980s  and  have  resulted  in  some 
successes.  Assessment  of  Operation  Desert  Storm  requirements  indicate  that 
the  mobility  enhancement  capability  of  the  Army’s  detection  and  breaching 
assets  needs  improvement.  [Ref.  1:  p  72] 

Mobility  and  maneuver  are  essential  elements  of  the  U.S.  Army’s  Airland  Battle 
Doctrine.  Anything  which  restricts  or  limits  our  ability  to  maneuver  is  a  potential 
hazard  to  the  implementation  of  this  doctrine.  Land  mines  are  such  a  hazard. 

Events  in  the  Middle  East  have  recently  highlighted  deficiencies  in  our  capability 
to  effectively  and  rapidly  respond  to  the  problem  presented  by  mines.  In  part  this 
problem  is  due  to  the  fact  that  the  state  of  the  military  art  in  regards  to  countermine 
warfare  has  progressed  very  little  since  World  War  n.  During  this  same  period, 
advances  in  electronics  and  integrated  circuits  have  enormously  increased  the 
capabilities  and  lethality  of  modem  mines.  Modem  land  mines  are  a  largely 
unquantified  impediment  to  the  maneuverability  required  for  successful 
implementation  of  the  Airland  Battle  doctrine. 

The  deficiencies  in  the  capabilities  of  the  U.S.  Army  to  conduct  countermine 
warfare  operations  have  long  been  recognized.  Numerous  ideas  and  programs  have 
been  suj^sted  to  alleviate  the  problem.  Unfortunately,  there  is  a  corresponding  lack 
of  capability  to  effectively  model  mine  and  countermine  scenarios  and  the  proposed 
equipment.  Since  actxial  field  experience  is  limited,  and  testing  is  both  expensive  and 
dangerous,  modeling  is  a  cost  effective  way  to  gain  insights  into  the  dual  problems  of 
dealing  with,  and  of  using,  land  mines.  A  brief  backgrovmd  of  the  program  currently 
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being  under  taken  to  remedy  the  modeling  deficiencies  is  presented  as  a  motivator  for 
this  thesis. 

In  1979,  the  Review  of  Army  Analysis  [Ref.  2]  found  numerous  deficiencies  in  the 
Army’s  computerized  combat  models.  These  deficiencies  included  poor  documentation, 
poor  response  to  study  needs,  inconsistent  results,  differing  data  assumptions,  lack  of 
interface  structure,  and  limited  (or  no)  f\mctional  area  representation.  As  a  result,  a 
directive  was  published  in  April  1980,  implementing  an  Army  Model  Improvement 
Program  (AMIP).  The  tasks  and  responsibilities  of  AMIP  are  described  in  Army 
Regulation  5-11. 

The  Engineer  Model  Improvement  Program  (EMIP)  is  a  part  of  the  AMIP 
designed  to  ensure  that  the  engineer  ftmctional  area  is  properly  represented  in  the 
Army’s  hierarchy  of  approved  combat  simulation  models.  The  EMIP  plan  was 
published  by  the  Engineer  Studies  Center  [Ref.  3].  M^or  elements  of  the  EMIP  plan 
provide  for  changes  to  the  Combined  Arms  and  Support  Task  Force  Evaluation  Model 
(CASTFOREM),  Vector-In-Command  Model  (VIC),  the  Force  Evaluation  Model 
(FORCEM),  and  for  the  development  of  an  Engineer  Functional  Area  Model  (EFAM). 
Priority  was  placed  on  enhancements  to  VIC  and  the  development  of  a  VIC-based 
EFAM.  This  work  was  conducted  by  the  US  Army  Corps  of  Engineer  Laboratories  and 
was  completed  in  FY91. 

Another  goal  of  EMIP  was  to  develop  high  resolution  engineering  specific 
simulation  modeb.  Deficiencies  exist  in  analytical  tools  that  can  be  used  to  perform 
studies  of  breaching  operations  of  both  linear  (e.g.,  opposed  river  crossing  operations) 
and  area  obstacles  (e.g.,  obstacle  complexes  which  might  include  tank  ditches, 
concertina,  minefields,  etc.). 


2 


Hie  CASTFOREM  can  be  used  for  these  types  of  studies,  however,  scenarios  can 
require  several  man  years  worth  of  development  time.  The  JANUS(A)  interactive 
simulation  model  can  be  used  for  quick  turn  around  studies.  However,  since 
JANUS(A)  is  an  interactive  simulation  model,  parametric  studies  are  difficult  if  not 
impossible  to  perform. 

Since  the  breaching  of  minefields  is  currently  the  highest  priority  within  the 
engineering  community,  a  mqjor  requirement  exists  for  an  analytical  tool  to  conduct 
future  material  studies  on  such  systems  as  the  Combat  Mobility  Vehicle  (CMV)  and 
the  Wide  Area  Mine  (WAM),  in  support  of  the  combat  engineers.  In  addition,  a  tool 
is  needed  to  address  force  structure  (number  of  plows  and  rollers  needed  in  a  typical 
armor  company)  and  tactical  problems  (location  of  breaching  assets  during  various 
tactical  formations)  that  presently  need  additional  analysis. 

The  lack  of  high  resolution  tools  to  investigate  minefield  interactions  is  the 
stimulus  for  this  thesis,  which  is  intended  to  provide  a  baseline  tool  for  use  in 
investigating  the  dynamics  of  minefield  breaching.  Several  basic  methodologies  for 
high  resolution  discrete  modeling  of  minefield  and  vehicle  interactions  are  proposed 
and  then  implemented  in  a  SIMSCRIPT  program.  The  resulting  model  is  currently 
limited  in  scope,  dealing  solely  with  the  more  conventional  mines  and  with  plowing  as 
the  only  breaching  technique.  However,  the  routines,  functions  and  structure  of  the 
model  provided  fSscilitate  the  modeling  of  additional  attributes  of  the  minefield 
problem. 

Interested  readers  are  also  directed  to  the  thesis  written  by  Captain  Malcolm 
Garland  [Ref.  4].  The  model  written  for  that  thesis  uses  some  of  the  maneuver 
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methodologies  developed  here  to  investigate  the  utility  of  using  artillery  fires  to 
reduce  mine  density  prior  to  the  conduct  of  a  minefield  breach. 
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n.  PROBLEM  DISCUSSION 


A.  MINES 

The  military  forces  have  been  dealing  with  effective  land  mines  since  World  War 
I.  Since  that  time,  human  ingenuity  and  the  motivation  provided  by  numerous  wars 
have  resiilted  in  continuously  improved  effectiveness  for  the  military  land  mine.  With 
the  advances  in  the  state  of  the  art  brought  on  by  modem  technology,  land  mines  have 
become  a  very  real  threat  to  the  success  and  even  the  survival  of  an  attacking  force. 

Mines  are  unique  among  obstacles.  Not  only  do  mines  fill  the  traditional  role  of 
an  obstacle  by  delaying  an  attacking  force,  but  land  mines  also  have  the  capability  to 
inflict  other  costs  upon  that  attacker.  Among  them, 

•  lost  time 

•  damage  to  eqtiipment 

•  casiudties 

•  lost  ability  to  maneuver 

•  lost  momentum 

•  logistical  burden 

•  loss  of  morale. 

Most  of  these  costs  are  measurable  to  some  extent,  so  a  quantitative  evaluation 
of  the  costs  for  a  given  minefield  scenario  can  be  made  without  the  requirement  to 
link  these  costs  to  a  tactical  result.  Alternative  ideas  may  be  compared  in  terms  of 
cost  without  consideration  of  what  criteria  are  to  be  used  for  defining  acceptable  or 
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unacceptable.  A  computer  model  can  be  used  to  develop  an  estimate  of  the  costs 
involved. 

Mines  pose  a  psychological  as  well  as  physical  obstacle.  A  soldier  that  is  worried 
about  setting  off  a  land  mine  will  not  be  as  aggressive  as  the  soldier  who  is  confident 
that  a  reliable  path  exists  through  the  minefield.  Morale  is  likely  to  suffer  if  no 
reliable  means  of  dealing  with  the  threat  produced  by  land  mines  exists. 

Avoiding  a  minefield  may  be  worse  than  going  through  it.  One  use  of  mines  is 
to  deny  a  force  the  ability  to  maneuver  in  the  mined  area.  In  this  way,  minefields  are 
used  to  channelize  the  attackers  into  prepared  killing  zones,  allowing  a  small  force, 
protected  by  minefields,  to  deflect  an  attacker  into  an  engagement  area  designed  to 
destroy  it.  The  best  course  of  action  may  be  to  breach  minefields  rather  than  to 
predictably  attempt  to  go  around  them. 

There  are  several  broad  categories  of  military  mines  used  on  the  modem 
battlefield.  These  categories  include,  but  are  not  limited  to,  chemical,  antipersoimel, 
and  antivehicular  mines.  Antitank  mines  are  a  subset  of  the  antivehicular  mine 
family.  Such  mines  are  designed  to  immobilize  or  destroy  armored  vehicles  and  their 
crews. 


1.  Mine  Deeigne. 

Antitank  mines  perform  their  function  by  either  attacking  the  vehicles  ability 
to  move,  resulting  in  what  is  called  a  mobility  kiU,  or  by  the  complete  destruction  of 
the  vehicle,  which  is  known  as  a  catastrophic  kill.  A  mobility  kill  is  achieved  by 
destroying  one  or  more  of  the  vehicles’  vital  drive  components,  usually  breaking  the 
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track,  thereby  causing  the  vehicle  to  be  immobilized.  With  a  mobility  kill,  the  weapon 
system  may  still  continue  to  function.  A  catastrophic  kill  will  result  in  the  entire 
vehicle  and/or  crew  being  destroyed. 

Current  production  antitank  mines  may  weigh  up  to  25  poimds,  be  contained  in 
either  plastic  or  metallic  cases,  and  come  in  a  variety  of  colors.  Some  mines  are 
designed  to  be  mechanically  emplaced,  while  others  are  intended  to  be  emplaced  by 
hand.  Antitank  mines  may  be  buried  beneath  the  surface  by  either  manual  or 
mechanical  means,  or  they  may  be  siuface  scattered.  Many  countries  have  developed 
or  are  developing  the  ability  to  remotely  deliver  surface  mines.  Different  t3rpes  of 
mines  are  often  mixed  together. 

Mines  may  be  used  in  a  variety  of  circumstances.  Nuisance  minefields  are  placed 
in  order  to  hinder  and  disrupt  an  enemy.  Hasty  protective  minefields  are  laid  out  to 
provide  quick  protection  for  a  defending  force.  Deliberate  minefields  are  obstacles 
integrated  into  the  defensive  plan  and  are  usiudly  of  high  density  and  emplaced  in 
specific  patterns. 

2.  Distinguishing  Chsuracteristics. 

Conventional  antitank  mines  can  be  distinguished  by  the  type  of  engagement 
mechanism  used  and  the  method  of  fuzing  that  initiates  the  engagement. 
Engagement  mechanisms  include  blast,  self  forging  penetrators,  and  shaped  charges. 
Methods  of  fiizing  are  numerous,  but  include  single  or  multiple  pressure  pulses, 
command  firing,  magnetic  influence,  seismic  vibrations,  and  motion  detecting.  Many 
mines  also  allow  for  the  provision  of  antihandling  devices  to  prevent  removal. 


Blast  mines  attack  their  target  through  blast  caused  by  the  detonation  of  a 
quantity  of  high  explosive.  These  mines  usually  produce  a  mobility  kill  but  a 
catastrophic  kill  is  possible. 

Self-forging  mines  engage  their  victims  with  an  explosively  shaped  metal 
penetrator  designed  to  defeat  the  thinner  underside  of  a  vehicles’  armor  and  spray 
shrapnel  and  plasma  throughout  the  inside  of  the  vehicle,  with  the  designed  intent  of 
igniting  fuel,  detonating  ammunition,  and  killing  the  crew.  The  usual  result  of  a 
successful  engagement  of  this  type  is  a  catastrophic  kill. 

Horizontal-effect  mines  use  a  shaped  charge  to  penetrate  the  thinner  sides  or  top 
of  armored  vehicles,  possibly  resulting  in  a  catastrophic  kill.  Depending  on  the  type 
of  sensors  and  fuzing  used  these  mines  may  be  emplaced  a  considerable  distance  from 
the  expected  engagement  areas.  These  types  of  mines  are  frequently  placed  on  the 
sides  of  roads  and  other  vehicular  avenues  of  approach,  or  they  may  be  used  to 
overwatch  conventional  minefields  to  prevent  the  use  of  breaching  equipment. 

Antitank  mines  are  further  distinguishable  by  their  fuzing.  There  are  three 
broad  categories  of  antitank  mine  fuzes;  track-width  fuzes,  full-width  fuzes,  and  wide- 
area  fuzes. 

Track-width  fuzes  are  usually  pressure-actuated  and  require  the  wheels  or  tracks 
of  the  vehicle  to  pass  directly  over  the  mine.  This  type  of  fuze  will  normally  produce 
a  mobility  kill  since  it  will  detonate  directly  under  the  tracks  or  wheels. 

Full-width  fhzes,  such  as  tilt-rod,  magnetic-influence  or  seismic  fuzes,  are 
designed  to  be  effective  across  the  entire  width  of  the  target.  This  type  of  fuze  is 
usually  employed  in  conjunction  with  a  self  forging  or  shaped  charge  warhead  to 
produce  a  catastrophic  kill  when  the  mine  is  straddled  by  an  approaching  vehicle. 
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When  a  full-width  fuze  is  activated  under  the  wheels  or  tracks  of  a  target  vehicle,  a 
mobility  kill  usually  results  because  most  of  the  energy  is  absorbed  by  the  vehicle 
suspension. 

Wide-area  fuzes  are  used  to  enable  mines  to  attack  vehicles  which  do  not  pass 
directly  over  the  mines  location.  The  fuze  may  be  as  simple  as  a  trip  wire  activating 
a  horizontal-effect  off  road  mine,  or  as  complex  as  seismic  activated,  infrared  searching, 
homing  munitions.  Such  fuzes  are  normally  placed  on  mines  designed  to  produce  a 
catastrophic  kill. 


B.  BREACHERS 

The  only  currently  available  solution  to  the  problem  presented  by  any  buried  or 
surface  laid  mine,  regardless  of  its  fuzing,  is  to  detect  and  identify  it  as  a  mine  and 
then; 


•  destroy  it  in  place  with  explosives 

•  mechanically  extract  it  or  push  it  aside 

•  pull  it  out  with  a  long  rope  or  wire  from  a  protected  position. 

For  armor  operations,  the  fastest  and  safest  mine  removal  technique  is  to  either 
detonate  it  fiom  a  distance,  or  mechanically  extract  or  push  aside  any  mine  which 
happens  to  be  in  the  path  of  the  vehicle  so  that  if  the  mine  vere  to  detonate  it  would 
do  so  with  tniniirmiti  danger  to  personnel  and  little  or  no  damage  to  the  vehicle.  A 
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number  of  techniques  and  devices  for  accomplishing  this  action  have  been  devised  over 
the  years.  The  most  common  and  proven  of  these  follow. 

Full  Width  Plow.  Full  width  plows  are  blade  and  tine  assemblies  designed  to 
remove  mines  for  the  full  width  of  the  blade  and  spill  the  mines,  as  well  as  a 
significant  amount  of  soil  to  either  side  of  the  breach  lane.  They  are  usually  a 
permanent  part  of  a  specially  designed  engineering  vehicle.  Such  vehicles  are 
specifically  designed  with  the  horsepower  required  to  push  the  blade  through  a  variety 
of  soil  types. 

Current  plows  may  make  single  pass  lanes  up  to  five  meters  wide,  and  depending 
on  soil  type  up  to  40  centimeters  deep.  The  tines  are  typically  designed  to  remove 
mines  20  centimeters  in  sise  or  larger.  Plows  may  be  particularly  effective  at  removing 
surface  laid  mines,  since  the  depth  of  cut  need  be  only  a  few  centimeters. 

Full  width  plow  vehicles  tend  to  be  slow.  Their  designs  are  optimized  to  provide 
the  tractive  forces  necessary  to  move  large  amounts  of  soil.  Being  slow,  they  are 
particvilarly  easy  targets  for  the  enemy  forces  typically  overwatching  minefields.  Being 
breachers,  they  are  given  a  high  engagement  priority  by  the  defenders. 

The  designers  of  mines  are  also  not  without  recourse  when  confronted  with 
plows.  Although  the  plow  itself  is  usually  quite  sturdy,  some  of  the  mechanisms  used 
to  control  the  depth  of  cut  are  more  vulnerable.  Mines  equipped  with  an  antihandling 
device  wUl  go  off  when  disturbed  by  the  blade.  The  resulting  blast,  depending  on  the 
mr-tk  and  type  of  mine,  may  be  sufficient  to  damage  the  blade  or  the  more  delicate 
control  thereby  rendering  the  blade  less  effective  and  more  vulnerable 

to  the  remaining  mines  in  its  path.  Area  effect  mines  are  not  dependent  on  the  close 
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proxiimty  of  the  target  for  activation,  and  these  types  of  mines,  when  added  to  the 
minefield,  wotild  be  particularly  useful  in  destroying  the  breachers. 

Tank  Mounted.  Track-Width  Plow.  Track  width  plows  consist  of  plow  assemblies 
which  mount  directly  onto  tanks.  A  m^or  advantage  of  using  track  width  plows  is  that 
they  may  be  made  organic  to  the  unit,  and  therefore  be  constantly  available  for  use. 
These  devices  plow  the  area  immediately  in  front  of  the  vehicle  tracks,  uprooting 
and/or  displacing  mines  to  the  outside  of  the  vehicle’s  path.  The  plows  are  capable 
of  removing  land  mines  or  booby  traps  which  are  surface  laid  or  buried  up  to  15 
centimeters  below  the  stirface. 

A  weighted  chain  assembly,  sometimes  called  a  "dog  bone"  is  stnmg  between  the 
two  plows,  in  order  to  activate  (harmlessly  in  front  of  the  tank)  any  tilt  rod  type  mines 
encountered. 

Track  width  plows  have  several  limitations.  The  "dog  bone"  only  clears  tilt  rod 
type  mines  from  beneath  the  vehicles.  Influence  type  mines  which  happen  to  lay 
between  the  track  plows  would  not  be  removed  by  either  the  plows  or  the  "dog  bone". 
Tanks,  while  capable  of  using  the  plows,  are  not  designed  for  this  type  of  activity,  so 
there  are  consequences  with  regard  to  the  depth  of  plowing  possible  and  the  maYimnm 
speed  at  which  the  vehicle  can  plow.  Damaged  plows  may  cause  the  vehicle  to  be  at 
least  temporarily  disabled  until  the  damaged  equipment  can  be  jettisoned. 

As  mentioned  before,  a  coimter  to  the  use  of  plows  is  the  attachment  of  anti¬ 
handling  devices  onto  the  mines.  Plows  are  vulnerable  to  mine  explosions,  and  one  or 
two  may  destroy  the  plow’s  effectiveness. 

Fluil  A  flail  is  a  rotating  grlinder,  mounted  in  front  of  the  vehicle,  with  chains, 
sometimes  tipped  with  wei^ts,  attached  to  the  cylinder.  As  the  cylinder  rotates,  the 
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chains  or  weights  pound  the  groimd  in  front  of  the  vehicle.  This  action  is  intended 
to  detonate  or  physically  destroy  any  mines  in  the  path  of  the  flail.  Exploding  mines, 
unless  very  powerful,  will  at  most  destroy  a  single  chain  and  weight.  This  type  of 
equipment  tends  to  be  quite  complicated  mechanically  and  is  generally  not  organic  to 
maneuver  elements. 

Tank  Mounted  Roller.  Rollers  are  heavy  cylinders  which  are  either  rolled  in 
front  of  the  breaching  vehicle,  or  towed  behind  it.  A  roller  clears  mines  by  detonating 
them  with  direct  pressure.  The  roller  is  made  of  a  material  tough  enough  to  absorb 
several  detonations. 

One  counter  to  this  breaching  technique  is  a  delay  fuze  timed  to  detonate  a  short 
period  of  time  after  activation,  hopeflilly  (from  the  mines  owner’s  viewpoint)  under  the 
breaching  vehicle.  Another  coimter-coimter  measure  would  be  a  multiple  pressure 
pulse  fuze,  which  must  be  activated  several  times  before  it  detonates  its  explosive 
charge,  thereby  allowing  several  vehicles  to  pass  before  detonating  and  blocking  the 
lane.  Rollers  are  usually  used  to  ’proof  minefield  lanes. 

Line  Charge.  Line  charges  are  used  to  detonate  mines  in  the  projected  path  of 
the  breaching  force.  A  rocket  is  used  to  tow  a  explosive  filled  hose  across  the 
minefield.  The  explosive  in  the  hose  is  then  detonated.  The  overpressure  created  by 
the  explosion  detonates  pressiu'e  fuzed  mines  that  are  in  the  vicinity.  Pressure  mines 
equipped  with  a  fuze  which  requires  a  long  pressure  pulse  will  not  be  affected. 
Influence  mines  are  also  not  likely  to  be  affected  unless  they  are  so  close  to  the  charge 
as  to  be  physically  destroyed  by  the  blast 

Fuel  Air  Explosive.  Fuel  Air  Explosives  (FAE)  use  a  similar  technique  as  the  line 
charge.  An  explosive  vapor  is  created  and  then  ignited.  The  resulting  explosion  is 
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very  intense  and  intended  to  clear  pressure  fuzed  mines  in  the  area  of  the  blast  by 
creating  a  pressure  pulse. 

C.  DOCTRINE 

1.  Countermine  Operations 

The  taskforce  commander,  when  in  combat,  can  expect  to  be  confronted  by  a 
variety  of  obstacles.  These  obstacles  must  be  overcome  to  mwintjiin  the  initiative  and 
the  momentum  of  the  attack.  The  taskforce  commander  must  quickly  decide  whether 
to  bypass,  breach,  or  force  through  the  obstacle. 

The  obstacle  should  be  scouted  to  determine  if  it  is  part  of  an  occupied  defensive 
position,  and  if  so,  the  enemy  strength  and  locations. 

"Forcing  through*  is  a  term  used  to  describe  the  tactic  of  ignoring  a  minefield 
and  attempting  to  simply  drive  across  it,  using  only  the  eqmpment  on  hand  and  with 
a  minimum  of  preparation.  Vehicles  may  travel  in  single  file  in  an  effort  to  reduce 
risk,  however,  casualties  are  an  expected  rrault  of  this  technique.  Forcing  through  a 
minefield  obstacle  is  used  only  as  a  last  resort.  Forcing  minefields  can  cause 
substantial  losses  of  personnel  and  equipment.  The  urgent  of  the  taskforce  mission 
will  be  the  deciding  factor. 

When  an  obstacle  is  encoimtered,  it  mxist  be  rapidly  reconnoitered  to  determine 
if  bypass  routes  exist  and  if  such  routes  are  covered  by  enemy  fires.  When  possible, 
current  docUine  miIIh  for  enemy  minefields  to  be  bypassed  rather  than  breached  since 
bypassing  nmintiiiTi*  the  momentum  and  conserves  critical  countermine  assets. 


However,  any  decision  to  bypass  must  consider  the  possibility  of  the  friendly  units 
being  channelized  into  kill  zones. 

If  the  decision  to  breach  is  made,  then  the  type  of  breaching  operation  to  be 
conducted  must  be  decided.  If  time  is  important,  then  the  unit  may  attempt  a  hasty 
breach.  If  time  is  less  critical,  or  if  the  likelihood  of  a  successful  hasty  breach  is  very 
poor,  then  the  taskforce  may  conduct  a  deliberate  breach  of  the  obstacle. 

The  hasty  breach  is  a  tactical  assault  breach  used  when  the  momentiun  of  the 
attack  must  be  kept  up.  If  engineer  assets  are  currently  attached  or  reasonably 
available,  they  may  be  used.  Any  organic  breaching  equipment  will  be  prepared  and 
utilized.  The  breach  will  usually  be  conducted  while  xmder  enemy  fire  and  because 
of  mission  critical  time  constraints,  speed  of  execution  is  important.  When  the  time 
available  to  begin  the  conduct  of  the  breach  of  a  minefield  is  not  critical,  a  deliberate 
breach  may  be  conducted  using  engineers  and  specialized  breaching  equipment. 

Maneuver  forces  assigned  the  mission  of  breaching  the  obstacle  will  normally  be 
organized  into  specific  elements  as  part  of  the  assault  breaching  plan.  These  elements 
are  known  as  the  breaching  force,  the  assault  force  and  the  support  force. 

The  breaching  force  has  the  mission  of  actually  creating  the  lanes  through  an 
enemy  obstacle  system  for  the  assault  force  to  pass  through.  These  forces  are 
normally  composed  of  engineers,  scouts,  and  armor.  If  available  and  time  permits, 
specialized  breaching  equipment  is  obtained  and  utilized.  After  the  breach  is 
completed,  the  breaching  force  is  normally  reorganized  to  assist  the  assault  force. 

The  assault  force  has  the  mission  to  attack  through  the  breach,  penetrate  the 
defense,  and  destroy  the  enemy.  An  assault  force  is  normally  built  around  a  combined 
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arms  tank  unit.  The  assault  force  will  attempt  to  stay  within  the  boundaries  of  the 
lane  created  by  the  breaching  force. 

The  support  force  includes  all  units  providing  close,  continuous,  overwatching 
fires  to  support  first  the  breaching  force  and  then  the  assault  force.  The  support  force 
normally  consists  of  tanks;  wire-guided  missile  systems;  organic  indirect  fire  elements; 
field  artillery  in  close  support;  and  chemical  company  (smoke)  elements  if  available. 
The  support  force  may  be  required  to  widen  initial  lanes  created  by  the  breaching 
force,  or  support  another  unit  in  that  task  with  suppressive  fires. 

The  assault  force  and  then  the  support  force  provide  suppressive  fires  as  the 
obstacle  is  reconnoitered  and  the  breaching  force  prepares  to  breach.  If  the  decision 
is  made  to  breach  the  obstacle,  flank  security  must  be  provided. 

The  actions  taken  by  the  various  elements  in  the  conduct  of  a  breaching 
operation  follow; 

•  Support  Force.  The  support  force  occupies  overwatch  positions  in  order  to 
protect  those  elements  moving  through  the  obstacle.  The  support  force  will 
provide  direct  and  indirect  suppressive  fires  on  the  enemy.  The  support  force 
will  use  smoke  (pots,  mortars,  artillery,  grenades)  as  appropriate  to  degrade 
enemy  observation  of  the  obstacle. 

•  Breachina  Force.  As  an  obstacle  is  encountered,  the  breaching  force  immediately 
occupies  covered  and  concealed  fighting  positions;  hastily  coordinates  specific 
tasks;  and  prepares  equipment,  demolitions,  and  routes  to  the  obstacle.  Once 
enemy  fires  are  suppres^,  the  breaching  force  rapidly  breaches  the  obstacle. 
The  force  then  secures  fighting  positions  near  the  far  side  of  the  obstacle  as 
quickly  as  possible. 

e  |\nnn)llt  FttiTIT  As  the  breaching  force  is  breaching  the  obstacle,  the  assault  force 
prepares  to  attack  through  the  obstacle.  Once  the  breaching  force  secmes  initial 
positions  on  the  far  side,  the  assault  force  attacks  through  the  obstacle  and 
destroys  enemy  elements  that  may  be  able  to  place  direct  fires  on  the  obstacle. 
Then  it  either  continues  the  advance  as  the  lead  element  for  the  attacking  imit, 
or  occupies  hasty  defensive  positions  as  the  support  force  passes  through  and 
takes  the  lead  in  the  attack. 
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When  a  unit  is  attacking  across  open  terrain,  the  minimum  distance  between 
lanes  should  be  250  to  300  meters.  This  keeps  the  enemy  from  blocking  more  than 
one  lane  with  a  single  artillery  concentration.  The  distance  between  lanes  may  be 
greater  than  300  meters,  depending  on  the  commander’s  ability  to  maintain  control 
of  his  force. 

2.  Mine  Operations 

Planning  for  the  effective  use  of  minefields  as  obstacles  requires  the 
consideration  of  numerous  factors.  Foremost  must  be  the  commander’s  plan  of 
operations.  For  most  mines  to  be  effective  as  an  obstacle  considerable  planning  must 
go  into  the  logistics  of  transporting  the  mines  to  the  desired  location  and  then 
installing  them.  Some  mine  types  are  quite  bulky  and  require  extensive  logistical 
support  as  well  as  individual  installation.  Others  are  small  and  can  be  rapidly 
emplaced  with  mechanical  devices,  or  be  delivered  from  missiles,  aircraft  or  artillery. 

For  the  purposes  of  this  paper,  the  only  minefield  parameter  used  will  be  the 
density  of  the  minefield.  Minefield  density  is  used  as  a  means  of  expressing  the 
relationship  between  the  number  of  mines  emplaced  and  the  size  of  the  minefield.  It 
provides  an  indication  of  the  "efrectiveness”  or  "difficulty”  of  the  minefield  as  an 
obstacle.  There  are  two  ways  of  expressing  niinefield  density,  linear  density  and  area 
density. 

The  linear  density  of  a  minefield  is  the  average  number  of  mines  by  type  per 
meter  of  minefield  front,  regardless  of  the  depth  of  the  minefield. 
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Area  density  is  a  measure  usually  associated  with  scatterable  mines.  The 


measurement  specifies  the  niimber  of  mines  per  square  meter  of  minefield  area. 


D.  DISCUSSION 

This  model  currently  only  represents  the  use  of  plows  to  displace  mines  from  the 
vehicle  path.  The  only  mines  currently  modeled  are  pressure,  influence,  and  an 
antihandling  fuzed  mine  which  will  be  called  a  "contact  mine".  The  model  is  designed 
for  the  easy  addition  of  other  mine  types  and  breaching  techniques. 

One  of  the  problems  relating  to  the  breaching  of  minefields  involves  tradeoff 
analysis  between  the  survival  of  the  breacher  and  the  effectiveness  of  the  lane  the 
breaching  vehicle  creates. 

The  survivability  of  the  breacher  is  a  function  of  the  time  required  to  complete 
the  breach  lane  and  the  effectiveness  of  the  breaching  technique.  The  time  aspect  of 
this  function  is  dependent  upon  the  type  and  amoimt  of  enemy  overwatching  fire 
assigned  to  the  minefield.  Assuming  at  least  a  token  amount  of  overwatching  fires, 
then  the  more  time  it  takes  for  the  breacher  to  make  the  lane,  the  longer  it  is  exposed 
to  the  overwatching  fires  and  the  greater  the  likelihood  of  the  breacher  being  disabled 
by  those  fires.  Another  consideration  is  that  the  longer  it  takes  to  complete  the 
breach,  the  longer  the  defender  has  to  react  by  moving  in  reinforcements  and  calling 
for  supporting  fires. 

If  the  breacher  is  not  effective  at  removing  or  disabling  the  mines  in  its  path,  the 
breacher  may  be  destroyed  by  the  minefield  itself. 
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The  usability  of  the  resulting  lane  by  trailing  vehicles  is  also  a  function  of  the 
effectiveness  of  the  breacher  in  eliminating  the  threat  posed  by  the  mines  as  well  as 
the  navigation  accuracy  of  the  vehicles.  Trailing  vehicle  speed  is  also  a  factor,  again 
depending  upon  the  type  and  amount  of  overwatching  fires  present. 

The  issue  comes  down  to  the  time  required  by  the  breacher  to  accomplish  the 
breach  versus  the  width  of  the  breach  lane.  The  time  to  accomplish  the  breach  is  an 
important  factor  because  it  directly  impacts  on  the  survivability  of  the  breaching 
vehicle.  Of  course  other  factors  also  impact  on  the  breaching  vehicle’s  life  expectancy. 
These  include  the  amo\mt  and  type  of  overwatching  fires,  vehicle  armor  placement  and 
thickness,  minefield  characteristics,  mine  clearing  effectiveness,  etc.  Intuitively,  since 
the  more  dirt  we  are  pushing,  the  slower  we  push  it,  we  would  want  to  plow  a  lane  as 
narrow  and  as  shallow  as  feasible. 

The  flip  side  of  the  problem  is  that  the  breach  lane  must  be  wide  enough  for 
trailing  vehicles  to  "safely*  negotiate  the  path.  Realize  that  a  single  mine  encounter 
may  resiUt  in  the  lane  being  blocked.  We  caimot  simply  choose  a  width  to 
accommodate  the  widest  vehicle  (probably  a  tank)  but  we  must  also  allow  for  the  fact 
that  combat  vehicles  are  not  known  for  their  precision  handling,  just  as  most  military 
drivers  are  not  known  for  their  precision  driving.  A  certain  amount  of  "navigation 
error"  is  to  be  expected,  and  the  lane  must  be  wide  enough  to  allow  for  this  error. 

Speed  through  a  minefield,  as  it  impacts  on  survivability,  is  important  only  when 
the  minefield  is  covered  by  direct  or  indirect  fire.  When  a  minefield  is  covered  by  fire, 
the  longer  a  vehicle  is  in  the  field,  the  greater  the  chance  of  immobilization.  The 
movement  speed  through  the  minefield  is  initially  a  problem  relating  to  how  long  it 
takes  the  breacher  to  make  a  lane.  Non-breacher  vehicles  would  sti^  out  of  the 
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minefield  until  a  lane  has  been  made,  or  all  breachers  have  been  disabled.  Upon 
completion  of  the  lane,  other  vehicles  would  attempt  to  pass  through.  If  they  are 
immobilized,  then  the  lane  may  be  blocked. 
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in.  METHODOLOGY 


This  thesis  presents  several  methodologies,  along  with  their  corresponding 
SIMSCRIPT  coded  algorithms,  which  are  designed  to  provide  a  basic  framework  for 
futiire  minefield  modeling  efforts.  The  algorithms  are  intended  to  serve  as  a 
foundation  for  more  ambitious  efforts  directed  toward  high  resolution  modeling  of 
mobility  and  countermobility  scenarios.  The  model  currently  has  only  one  categoiy 
(plows)  of  breaching  equipment  represented.  The  methodologies  presented  are 
designed  to  model  basic  minefield  related  activities  to  include: 

•  navigation  by  an  assaulting  force 

•  discrete  mine-vehicle  encounters 

•  mine  displacement  by  plows 

•  overwatching  fires  by  the  defenders. 

The  methodologies  and  algorithms  presented  are  flexible  enough  to  apply  to 
many  different  scenarios  with  only  minor  modifications.  The  model  itself  is  designed 
for  easy  expansion  and  modification  to  include  the  addition  of  other  types  of  breaching 
equipment,  vehicles,  mines,  and  obstacles. 

The  approach  taken  in  presenting  these  methodologies  is  to  first  discuss  the  real 
life  mechanics  of  the  situation  and  the  significance  of  the  attributes  which  are  to  be 
modeled,  and  then  to  give  a  description  of  how  the  attribute  is  to  be  captmed  in  the 
program  code.  Chapter  IV  will  go  into  more  detail  as  to  how  the  program  actual 
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implements  the  algorithms  and  in  Chapter  V  an  example  of  how  they  can  be  used  will 
be  presented. 

A.  VEfflCLE  NAVIGATION 

As  a  vehicle  moves  over  an  area,  it  casts  a  shadow  or  a  "footprint”  on  the  groimd. 
In  this  paper,  the  actual  area  which  passes  tmder  the  tracks  or  wheels  of  a  vehicle  will 
be  called  the  "pressure  footprint"  and  that  area  which  passes  under  any  portion  of  the 
vehicle  will  be  labeled  the  "influence  footprint”.  Note  that  the  pressure  footprint  is 
a  subset  of  the  influence  footprint. 

The  individual  footprints  for  multiple  vehicles  moving  over  a  piece  of  terrain  will 
vary  as  a  result  of  several  factors.  If  the  taskforce  consists  of  a  variety  of  vehicle  t}rpes, 
the  physical  dimensions  of  the  different  type  vehicles  will  result  in  different  footprints. 
The  size  of  these  footprints  can  be  determined  by  examination  of  the  vehicle 
specifications.  Another  less  predictable  cause  of  variation  is  what  this  paper  will  call 
"navigation  error". 

It  is  essentially  impossible  for  any  two  vehicles  to  have  precisely  the  same 
footprints,  even  if  they  have  the  same  physical  dimensions.  This  is  because  of 
inaccuracies  inherent  in  the  steering  mechanisms  of  the  vehicles  and  because  of  the 
human  element  introduced  by  the  drivers  of  each  vehicle.  The  human  element  may 
be  particularly  apparent  at  night.  The  resulting  differences  in  footprints  due  to  the 
mechanical  and  hxunan  inaccuracies  is  the  "navigation  error". 

The  situation  may  arise  where  a  vehicle  is  unsuccessful  in  passing  through  a 
minAfiwM  even  though  it  is  attempting  to  follow  the  same  path  as  a  successful  vehicle. 
Although  there  are  multiple  reasons  why  this  might  happen,  one  possible  explanation 


is  the  difference  in  the  respective  vehicle  footprints.  Specifically,  the  trailing  vehicle 
did  not  have  exactly  the  same  footprint  in  its  traversal  of  the  lane.  Even  small 
deviations  from  the  lane  may  be  hazardous.  Figure  3-1  shows  the  res\ilting  mine 
densities  after  a  lane  has  been  made  by  a  f\ill  width  plow  and  by  a  track  width  plow. 
Note  that  the  only  area  that  might  be  considered  safe  is  that  portion  of  the  lane  that 
makes  up  the  pressure  footprint  of  the  breaching  vehicle.  The  areas  to  either  side  of 
the  lane  are  now  more  dangerous  than  they  were  originally,  since  they  hold  not  only 
their  original  complement  of  mines,  but  also  those  mines  displaced  by  the  plows.  It 


Resulting  Minefield  Densities 


Full  Width  Plow  Track  Width  Plow 


Figure  3-1 


22 


is  possible  that  the  displaced  mines  will  have  a  decreased  lethality,  however  the  worst 
case  assumption  is  that  any  displaced  mine  is  still  capable  of  functioning  as  designed. 
At  any  rate,  at  least  some  of  the  displaced  mines  would  still  be  viable,  so  the  actual 
mine  density  of  the  lane  shoulders  has  increased.  Note  also  that  the  lane  itself  may 
still  contain  mines  which  were  either  buried  deeper  than  the  plow  was  set  to  dig,  or 
slipped  through  the  tines  on  the  plow,  or  rolled  back  into  the  lane  from  the  side  spill. 

This  model  makes  provision  for  "navigation  error"  in  the  traversal  of  the 
minefield  by  multiple  vehicles.  The  amount  of  navigation  error  used  is  a  fimction  of 
certain  values  input  by  the  user.  The  methodology  used  is  as  follows. 

The  intent  is  for  each  taskforce  vehicle  to  have  a  unique  movement  plan 
consisting  of  a  user  specified  number  of  navigation  checkpoints.  Each  vehicle  will 
move  from  checkpoint  to  checkpoint,  in  a  straight  line  between  the  adjacent 
checkpoints,  following  it’s  own  unique  (in  the  z  dimension)  movement  plan.  Each 
movement  plan  will  have  the  same  number  of  navigation  checkpoints.  Vehicles  are 
ass\uned  to  have  the  desire  to  follow  in  the  footprint  of  the  lead  vehicle,  therefore,  all 
deviation  is  measvu-ed  from  the  actual  centerline  of  the  path  made  by  the  lead  vehicle. 

The  y  axis  is  arbitrarily  designated  as  the  center  of  the  breach  lane  through  the 
minefield.  Since  the  first  vehicle  is  not  attempting  to  follow  a  lane,  but  is  in  fact 
making  the  lane,  it  is  asstuned  to  have  no  navigation  error.  It’s  movement  plan 
consists  of  a  series  of  navigation  checkpoints  located  on  the  y  axis. 

The  total  distance,  from  start  point  to  finish  point,  to  be  traveled  by  the 
taskforce  is  divided  into  a  user  specified  number  of  eqrud  intervals.  The  y-coordinates 
of  the  endpoints  of  these  intervals  become  the  y-coordinates  of  the  movement  plan 


checkpoints  for  all  taskforce  vehicles.  That  is,  the  y-coordinates  of  respective 
checkpoints  will  be  the  same  for  all  members  of  the  taskforce. 


For  each  checkpoint  an  x-coordinate  is  determined  through  use  of  a  normally 
distributed  random  draw.  Figure  3-2  depicts  this  procedure. 


Flgura  3-2  Oeteraining  tha  X-coordinate 


The  mean  of  the  distribution  is  assumed  to  be  zero,  meaning  that  a  vehicle  is 
assumed  to  be  as  Ukefy  to  deviate  to  the  left  as  to  the  right.  Shoxild  the  user  wish  to 
modify  this  assumption,  it  is  an  easy  matter  to  change  the  distribution  parameters  or 
even  the  distribution  itself.  The  standard  deviation  used  is  a  user  input.  The  default 
value  used  for  standard  deviation  is  one  meter. 
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A  normal  distribution  is  used,  because  it  is  assumed  (and  would  certainly  be  the 
desire  of  the  vehicle  crews)  that  the  vehicles  will  tend  to  follow  the  center  of  the  lane. 
Small  deviations  are  not  only  likely,  they  are  unavoidable.  Large  unintentional 
deviations  are  unlikely.  Deviations  are  equally  likely  to  occur  on  either  side  of  the 
breach  lane  and  there  is  no  reason  to  believe  that  the  magnitude  of  the  deviations  will 
differ  as  a  result  of  on  which  side  they  occur,  so  the  resulting  distribution  should  be 
S}rmmetric. 

The  process  of  generating  x-coordinates  is  continued  until  each  vehicle  in  the 
taskforce  has  a  series  of  checkpoints,  \mique  in  the  x-dimension.  An  example  of  a 
resulting  movement  plan  for  one  vehicle  can  be  seen  in  Figure  3-3. 


vwiMr  or  YiniGi#  Mowfwm  rwi 


Figure  3-3  Vehicle  Movement  Path  Exaaple 
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Once  the  x  and  y  coordinates  of  all  of  the  navigation  checkpoints  for  a  vehicle 
have  been  determined,  the  equations  for  the  lines  which  connect  adjacent  checkpoints 
are  determined.  This  is  done  by  first  determining  the  slope,  m,  using  the  equation; 


w 


y2-yi 


/  ^2  ^  • 


The  y-intercept,  b,  is  then  determined  by  using  one  of  the  checkpoints  at  either 
end  of  the  line,  the  previously  determined  slope,  and  the  equation, 

b  «  y-ttac. 

Each  vehicle  now  has  a  unique  movement  plan  governing  its  movement  which 
also  allows  for  navigation  error.  The  vehicle  will  be  moved  along  the  line  that  connects 
its  checkpoints  at  the  rate  indicated  by  the  vehicle’s  speed.  A  pointer  to  the  ciurently 
used  line  equation  indicates  to  the  program  routines  the  appropriate  slope  and 
intercept  values  to  be  used  for  calculating  the  vehicle’s  location  at  any  given  time. 
When  a  checkpoint  is  reached,  the  pointer  is  moved  to  indicate  the  next  line  equation 
to  be  used.  This  process  continues  until  the  vehicle  completes  its  movement  or  is 
immobilized.  Note  also  that  the  actual  me  of  straij^t  line  segments  to  describe  the 
movement  of  tracked  vehides  dosely  approximates  the  reality.  Of  course,  in  reality, 
tracked  vehide  do  not  move  in  straight  line  segments  of  uniform  length. 
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B.  MINE  ENCOUNTERS 

Ab  described  above,  each  vehicle  has  a  iinique  movement  plan  for  traversing  the 
minefield,  described  by  checkpoints  and  the  equations  for  the  lines  which  connect 
those  checkpoints. 

Each  mine  in  the  minefield  has  a  type,  a  radius  and  an  x  and  a  y  coordinate, 
which  describes  the  unique  location  of  that  mine  in  the  minefield.  Type  is  used  to 
identify  the  fuzing  method  used.  Currently  the  model  plays  either  pressure,  influence, 
or  contact  (antihandling)  mines. 

Pressure  fuzes  require  the  tracks  of  the  vehicle  to  actually  pass  directly  over  a 
portion  of  the  mine  before  the  mine  will  detonate.  Influence  fuzes  only  require  that 
a  portion  of  the  vehicle  pass  over  the  mine,  making  them  effective  for  the  entire  area 
of  the  vehicle  as  it  moves  over  the  field.  Contact  fuzes  are  aimilar  to  pressme  fuzes 
in  that  they  require  some  actiial  form  of  contact,  either  directly  with  a  portion  of  the 
vehicle  or  by  earth  compressed  by  the  weight  of  the  vehicle,  in  order  to  fimction. 
They  are  distinguished  however,  by  the  amount  of  pressure  required.  Contact  mines 
require  only  to  be  disturbed  in  order  to  activate.  They  are  intended  to  destroy 
breaching  equipment,  detonating  when  a  plow  (or  anything  or  anybody)  attempts  to 
move  them.  While  this  characteristic  makes  them  a  threat  to  most  breaching 
techniques,  such  mines  are  generally  quite  vulnerable  to  breaching  techniques  that 
rely  on  explosively  generating  shock  waves  and  overpressure  to  clear  pressure  mines 
from  the  minefield. 

Encounters  are  calculated  by  first  screening  the  entire  list  of  mines  to  determine 
which  ones  are  within  a  reasonable  distance  firom  the  vehicle.  By  doing  this  we 
eliminate  unnecessary  calculations  and  speed  up  the  simulation. 
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Then,  for  each  candidate  mine,  the  equation  of  the  line  that  passes  through  the 
center  of  the  mine  and  is  perpendicular  to  the  vehicle  path  equation  is  calculated. 
First,  the  slope  of  the  perpendicular  line  is  determined  through  use  of  the  theorem 
that  two  lines  are  perpendicular  if  and  only  if, 

in^  *  nij  »  -1 

where  mi  is  the  slope  of  the  vehicle  path  and  m2  is  the  slope  required  for  a  line 
perpendicular  to  the  vehicle  path. 

The  equation  for  the  perpendicular  line  is  found  using  the  point  slope  formula, 

Fi“  Fi  •  x^)  . 

The  intersection  of  the  perpendicular  line  and  the  vehicle  path  is  then 
determined  by  solving  the  two  line  equations  simultaneously.  This  point  is  where  the 
vehicle  has  a  potential  contact  with  the  mine.  Figure  3*4  illu^rates  the  geometry  of 
this  procedure. 

To  determine  if  contact  actually  takes  place,  the  distance  between  the  center  of 
the  mine  and  the  intersection  point  is  calculated.  Aflijustments  are  made  to  account 
for  mine  radius  and  the  fuzing  mechanism  used  by  the  mine  in  question  to  determine 
if  a  contact  will  actually  take  place.  If  a  contact  will  take  place  then  the  distance 
between  the  current  location  of  the  vehicle  and  the  intersection  point  is  calculated. 

If  an  actual  contact  is  possible,  the  mine  identification  and  distance  from  the 
vehicle  are  recorded  and  compared  with  the  current  closest  mine.  If  this  mine  is 
closer,  its  identification  and  distance  become  the  current  closest  The  next  candidate 
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mine  is  checked.  This  continues  imtil  all  candidate  mines  are  examined.  The  mine 
identification  and  the  distance  the  vehicle  must  travel  to  the  closest  mine  with  which 
contact  will  occur  are  then  returned  to  the  calling  routine. 

C.  MINE  DISPLACEMENT 

Mine  plows  are  not  designed  to  actually  destroy  the  mines  that  they  encoimter. 
The  mine  plow  performs  its  function  by  displacing  any  mines  encountered,  as  well  as 
a  substantial  amount  of  dirt,  to  either  side  of  the  breach  lane.  To  perform  adequately, 
the  plow  must  actually  remove  the  mines  from  the  lane  and  place  them  far  enough  to 
either  side  that  they  are  no  longer  a  threat  to  vehicles  navigating  within  the  lane. 
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Plows  should  be  particularly  effective  against  surface  laid  mines  since  they  do  not  have 
to  move  much  soil,  thereby  allowing  the  plow  to  maintain  a  reasonable  speed  while 
working  on  the  Iwe. 

As  Figure  3-1  previously  illustrated,  while  the  area  of  the  actual  breaching  lane 
becomes  safer,  the  areas  to  either  side  of  the  lane  actually  become  more  dangerous. 
There  is  also  a  small  but  finite  possibility  of  displaced  mines  rolling  back  into  the  lane 
after  being  moved  by  the  plow. 

Elach  plow  type  modeled  has  several  parameters  attached  to  it.  Of  particular 
importance  is  the  effectiveness  of  the  plow  which  is  an  attempt  to  capture  the  degree 
of  thoroughness  with  which  the  plow  removes  mines  in  its  path.  An  effectiveness  of 
one  indicates  that  the  plow  will  remove  every  mine  in  its  path,  assuming  that  the  mine 
is  buried  no  deeper  than  the  depth  at  which  the  plow  is  operating.  An  effectiveness 
of  less  than  one  indicates  that  a  percentage  of  mines  encoimtered  will  be  missed  by 
the  plow,  possibly  to  be  encoimtered  by  the  pressure  or  influence  footprints  of  the 
plow  itself  or  the  trailing  vehicles. 

The  methodology  used  to  capture  the  consequences  of  plowing  a  lane  requires 
that  non-contact  mines  encountered  by  a  plow  be  moved  to  the  side  of  the  lane.  A  new 
X  and  y  coordinate  is  calculated  for  the  mine  based  upon  the  location  of  the  edge  of 
the  plow  and  a  probability  distribution.  Should  the  mine  be  of  the  contact  type,  then 
further  calculations  must  be  made  to  determine  the  result  of  the  encoimter.  That  is, 
what  degradation  of  effectiveness  was  inflicted  upon  the  plow. 

The  distribution  currently  used  is  normal  with  a  mean  of  1.5  meters  to  the  left 
or  right  of  the  plow  edge  and  a  standard  deviation  of  1  meter.  The  determination  of 
which  side  of  the  plow  the  mine  is  displaced  to  is  simply  a  matter  of  on  which  side  of 


30 


the  centerline  of  the  plow  the  mine  falls.  Since  most  plows  are  shaped  somewhat  like 
an  inverted  "V",  mines  located  to  the  left  of  the  centerline  naturally  are  displaced  to 
the  left  and  those  on  the  right  to  the  right.  The  choice  of  the  normal  distribution  and 
the  parameters  chosen  are  purely  arbitrary  and  may  be  easily  changed  should  the  user 
desire.  It  should  be  noted  though,  that  the  choice  of  mean  and  standard  deviation 
allow  for  a  small  possibility  of  the  mine  coming  to  rest  within  the  lane. 

D.  OBSTRUCTION  AVOIDANCE 

When  a  vehicle  becomes  disabled  during  the  course  of  a  minefteld  breach,  either 
by  overwatching  fires  or  contact  with  a  mine,  it  becomes  part  of  the  overall  obstacle 
breaching  problem.  If  the  vehicle  is  negotiating  the  "cleared”  lane  when  it  becomes 
disabled,  then  the  vehicles  following  it  must  take  one  of  the  following  three  actions  in 
order  to  continue  using  the  cleared  lane. 

First,  the  disabled  vehicle  may  be  extracted  from  the  minefield  by  attaching 
cables  or  a  tow  bar  to  it  and  pulling  it  either  the  rest  of  the  way  through  the  minefield 
or  back  out  over  its  entry  path.  This  will  result  in  considerable  delay  and  increased 
exposure  by  all  concerned  to  overwatching  fires. 

The  trailing  vehicles  may  attempt  to  push  the  disabled  vehicle,  either  through 
the  remainder  of  the  minefield,  or  to  one  side  of  the  cleared  lane.  Pushing  a  disabled 
through  a  minefield  has  sometimes  been  considered  as  a  field  expedient  method 
of  breaching  minefields.  There  are  numerous  potential  problems  with  this  technique. 
If  a  track  has  been  lost,  the  disabled  vehicle  will  not  move  in  a  straight  line.  If  the 
damage  is  extreme,  then  the  disabled  vehicle  may  not  be  moveable  at  all  without 
special  equipment.  If  the  disabled  vehicle  is  on  fire,  there  is  a  danger  of  explosion  and 
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damage  to  vehicles  in  the  proximity.  A  burning  vehicle  may  also  serve  as  a  beacon  and 
aiming  point  to  enemy  elements  overwatching  the  minefield.  The  "pushing”  vehicle 
may  damage  its  own  track  tmd  suspension  components  in  the  effort.  The  pushing 
vehicle  may  stray  from  the  path  in  the  attempt  and  also  encounter  a  mine.  If  there 
are  still  crew  aboard  the  disabled  vehicle,  either  unable  or  unwilling  to  exit,  pushing 
the  vehicle  into  uncleared  areas  subjects  them  to  further  risk. 

A  final  option  is  to  go  arotmd  the  obstruction  formed  by  the  disabled  vehicle, 
leaving  the  cleared  lane  and  entering  imcleared  portions  of  the  minefield  for  the 
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distance  necessaty  to  bypass  the  obstruction.  The  bypassing  element  would  then 
reenter  the  cleared  lane  on  the  far  side  of  the  obstacle.  Figure  3-5  depicts  this  action. 
Note  the  greater  risk  of  mine  encounter  resulting  from  passing  through  the  edges  of 
the  cleared  lane  and  the  imcleared  portions  of  the  minefield.  If  the  bypass  is 
successM,  a  new  ’cleared’,  but  unmarked,  lane  results.  If  unsuccessful,  that  is,  if  the 
bypassing  vehicle  is  itself  disabled,  either  by  the  minefield  or  by  overwatching  Hres, 
then  the  lane  obstruction  becomes  larger. 

Bypassing  vehicles  will  want  to  leave  the  cleared  path  for  the  shortest  distance 
necessary  in  order  to  bypass  the  obstruction.  This  shortest  path  should  include  as 
little  as  possible  of  the  higher  mine  density  shoulders  of  the  cleared  lane. 

Bypassing  an  obstruction  in  the  lane  may  be  a  high  risk  technique,  particularly 
if  the  mines  have  been  laid  out  in  belts  and  the  obstructing  vehicle  has  been  disabled 
by  a  mine.  In  this  case  there  would  be  a  high  probability  of  additional  mines  being  to 
either  side  of  the  disabled  vehicle.  This  situation  may  hold  true  for  the  entire  width 
of  the  minefield. 

The  methodology  presented  in  this  model  addresses  only  the  tactic  of  bypassing 
a  disabled  vehicle.  If  the  options  of  recovering  or  of  pushing  the  disabled  vehicle  are 
desired  those  routines  will  have  to  be  developed  as  an  improvement  or  addition  to  the 
model. 

Whenever  a  taskforce  vehicle  is  disabled  by  either  mines  or  overwatching  fues, 
an  obstacle  is  created.  This  obstacle  entity  will  have  the  same  physical  dimensions  and 
location  as  the  disabled  vehicle.  The  disabled  vehicle  will  have  its  status  changed  to 
"inactive”  and  will  be  ignored  for  the  remainder  of  that  particular  model  run.  The 
location  and  size  of  the  newly  created  obstacle  will  be  added  to  the  obstacle  list. 
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Eveiy  time  an  active  vehicle  is  changed  to  an  inactive  status  due  to  a  mine 
encoimter  or  overwatching  fires,  the  event  calendar  for  the  simulation  must  be  purged 
of  all  pending  encounter  events.  When  this  step  is  complete  a  new  next  encounter 
event  for  each  active  element  is  redetermined  to  prevent  the  occurrence  of  "invisible 
obstacles".  An  invisible  obstacle  is  one  which  is  ignored  by  the  active  vehicles  in  the 
simulation.  They  are  ignored  because  they  were  created  after  the  trailing  vehicles  had 
already  determined  their  next  encounter,  which  should  now  be  an  obstacle  encounter, 
but  since  at  the  time  of  determination  the  obstacle  did  not  exist,  it  was  not  considered. 

All  obstructions,  and  the  vehicles  that  are  attempting  to  b3rpass  them,  are 
approximated  as  circles  by  computing  the  two  dimensional  surface  area  of  the  obstacle 
or  vehicle  and  then  determining  what  radius  a  circle  would  have  to  have  to  encompass 
that  area.  This  is  done  to  allow  an  efficient  algorithm  which  uses  simple  geometric 
constructs.  The  costs  of  using  such  an  approximation  are  a  relatively  small  loss  of 
acctiracy  in  the  x  and  y  coordinates  of  the  vehicle’s  sides  and  rear.  The  geometry  used 
for  determining  mine  encounters  does  not  use  the  circle  approximation,  but  rather 
uses  the  appropriate  vehicle  dimensions. 

When  an  active  vehicle  is  determining  what  its  next  encoimter  is  to  be,  the  first 
step  is  to  determine  its  current  checkpoint  interval  and  corresponding  movement 
equation.  The  obstacle  map  is  then  referenced  and  obstacles  which  lie  at  least  in  part 
within  that  interval  are  examined  as  potential  obstacle  encounters.  The  next  step 
taken  is  to  determine  the  path  a  vehicle  would  have  to  take  in  order  to  bypass  the 
obstruction.  Logically  the  path  should  be  as  short  as  possible  in  order  to  minimize  the 
vehicles  exposure  to  the  uncleared  portions  of  the  minefield  and  return  to  the  cleared 
path  as  soon  as  possible.  Given  the  circle  approximation,  the  shortest  possible  distance 
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would  be  a  semi-circle  in  the  direction  of  the  shortest  path  around  the  obstacle.  Since 
tracked  vehicles  typically  move  in  straight  line  segments  rather  than  semi-circles  and 
since  the  calculations  required  to  interface  the  quadratic  circle  equation  with  the 
linear  equations  used  by  the  rest  of  the  program  would  be  extensive  and  run  time 
expensive,  a  straight  line  approximation  is  used.  The  resulting  path  around  the 
obstacle  is  played  as  an  eqxiilateral  hexagon. 

Figure  3-6  illustrates  the  hexagon  b3q>as8  route  as  overlaid  on  an  circular 
obstruction.  The  numbers  1  through  6  denote  the  comers  of  the  hexagon  and  the 
letters  A  through  F  identify  the  six  sides.  Note  that  all  six  sides  of  the  hexagon  are 
tangent  to  the  circle  at  their  midpoints.  The  center  of  the  circle  has  the  same  location 
as  that  of  the  obstruction  and  the  radius  of  the  circle  is  equal  to  the  radius  of  the 
obstruction  plus  the  radius  of  the  bypassing  vehicle. 

The  coordinates  for  each  of  the  six  comers  of  the  hexagon  are  calculated  as 
follows.  Following  along  with  Figure  3-6,  the  symbol  O  is  used  to  denote  the  x 
coordinate  of  the  center  of  the  obstacle.  The  symbol  6  is  used  to  denote  the  y 
coordinate.  The  character  r  denotes  the  radius  of  the  bypass  circle.  The  value  of  r 
is  determined  by  adding  the  radius  of  the  obstacle  to  the  radius  of  the  bypassing 
vehicle.  O  denotes  the  center  of  the  circle. 

Construct  vertical  lines  at  +  r  and  -  r  units  from  the  center.  Observe  that  side 
B  of  the  hexagon  is  a  segment  of  the  vertical  line  located  r  units  in  the  positive  x 
direction  firom  O  and  that  side  E  of  the  hexagon  is  a  segment  of  the  vertical  line 
located  r  units  in  the  negative  x  direction.  With  the  top  of  the  diagram  representing 
0",  construct  vectors  from  the  center  of  the  circle  directed  outward  at  60”,  120”,  180”, 
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Figure  3-6  Obstruction  Bypass  Path 


■e 


240”  and  300” .  Comer  2  is  located  at  the  intersection  of  the  60”  vector  (labeled  R  on 
Figure  3*6)  and  the  vertical  line  at  +  r.  If  a  horizontal  line  is  constructed  through  the 
center  of  the  obstacle  (labeled  6  on  Figure  3-6)  it  can  be  seen  that  the  triangle 
resulting  from  the  intersections  of  the  5  Une,  +  r  vertical  line,  and  R  is  a  30*60*90 
degree  triangle.  From  this  observation  we  now  know  that  the  length  of  side  B  is 
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B  =  2*  —  *r 
>/? 


and  that  the  length  of  the  distance  from  the  center  to  the  intersection  of  the  60” 
vector  and  the  4-r  horizontal  line  is 


Symmetry  and  similar  calculations  are  now  used  to  determine  the  coordinates 
of  all  of  the  remaining  comers.  The  edge  of  the  resulting  hexagon  will  be  used  as  the 
centerline  of  the  path  a  vehicle  must  take  in  order  to  bypass  the  obstruction  in  the 
lane.  The  equations  for  the  lines  connecting  the  comer  points  are  generated  in  the 
same  manner  as  the  lines  connecting  the  navigation  checkpoints.  A  slight  modification 
must  be  made  for  the  two  vertical  sides,  B  and  E,  since  the  slope  of  a  vertical  line  is 
undefined.  An  approximation  is  made  by  making  the  slope  of  any  vertical  line  equal 
to  an  extremely  large  number. 

Variation  (navigation  error)  can  be  added  to  vehicle  footprints  during  a  bypass 
by  adding  a  small  distance,  randomly  generated,  to  the  value  calculated  for  the 
obstmction  radius. 

The  point  at  which  a  vehicle  will  exit  fi^m  its  original  movement  plan  path  and 
enter  the  l^ypass  path  is  the  point  where  the  current  movement  path  line  and  the  line 
describing  either  side  F  or  side  A  of  the  hexagon  intersect  Actually,  the  movement 
plan  equation  will  intersect  both  lines  since  none  of  the  three  lines  is  parallel  to  either 
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of  the  others.  The  actiial  intersection  of  interest  is  the  one  which  occurs  on  the 
hexagon  itself. 

The  point  where  the  vehicle  regains  the  original  movement  path  is  called  the 
"reentry  point".  The  y  location  of  comer  4  of  the  hexagon  will  be  compared  to  the  y 
locations  of  the  navigation  checkpoints  to  determine  the  boundary  condition.  That  is, 
the  interval  where  point  4  lies  is  the  farthest  interval  the  vehicle  may  reenter  into 
from  this  b}rpass.  The  vehicle  may  possibly  reenter  in  an  earlier  interval.  All  valid 
movement  plan  equations,  the  set  of  which  consists  of  the  line  equations  describing 
any  movement  plan  segments  between  and  including  the  movement  plan  equation 
used  when  the  bypass  path  was  initiated  and  the  movement  plan  eqxiation  used  within 
the  boundary  interval,  will  have  their  intersections  with  the  lines  describing  sides  D 
and  C  of  the  hexagon  calculated. 

The  y  coordinates  of  the  intersections  will  be  checked  against  the  y  coordinates 
of  the  checkpoints  to  which  they  correspond.  If  the  y  coordinate  is  valid,  (i.e.,  if  it  falls 
within  the  appropriate  interval)  then  the  x  coordinate  will  be  checked  against  the  x 
coordinates  of  the  intersections.  The  fust  valid  intersection  point  will  be  used  by  the 
vehicle  as  the  reentry  point. 

As  mentioned  earlier,  vehicles  are  exposed  to  greater  risk  of  mine  contact  when 
b}q)a8sing,  which  would  indicate  a  good  possibility  of  disabled  vehicles  being  in  close 
proximity  to  one  another.  Additionally,  if  numerous  vehicles  are  disabled  the 
calculations  for  bypassing  become  very  complex.  To  reduce  the  complexity, 
obstructions  are  combined  when  they  occur  within  a  user  specified  distance  from  one 
another.  This  amplification  is  justified  by  the  observation  that  there  is  unlikely  to  be 
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sufficient  distance  between  the  disabled  vehicles  to  allow  a  bypassing  vehicle  to  pass 
between  two  vehicles,  one  of  which  was  disabled  as  a  result  of  an  attempted  bypass. 

The  combination  of  obstacles  is  accomplished  by  computing  the  centroid  of  the 
combined  obstruction  using  the  eqiiations 

X  *  — ■ 


where  x  is  the  z  coordinate  of  the  combined  obstruction  and 

^  2 

where  y  is  the  y  coordinate  of  the  combined  obstruction.  The  radius  of  the  combined 
obstruction,  is 


-  max 

where  D^i  distance  from  the  center  of  the  combined  obstacle  to  the  center  of 
obstacle  1,  ia  the  distance  fium  the  center  of  the  combined  obstacle  to  the  center 
of  obstacle  2,  is  the  radius  of  obstacle  1,  and  r,  is  the  radius  of  obstacle  2.  Figure 
3-7  illustrates  the  geometiy  of  these  calculations. 
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Figura  3-7  Obstruction  Consolidation 

As  the  simulation  progresses,  multiple  obstruction  combinations  may  take  place. 

For  this  reason,  it  is  necessary  to  keep  track  of  how  many  obstructions  have  been 
combined  into  a  particular  combined  obstruction.  When  the  centroid  of  a  new 
obstruction  being  added  to  a  combined  obstruction  is  being  calculated  the  x  and  y 
coordinates  of  the  combined  obstruction  must  be  weighted  by  the  number  of 
obstructions  which  make  up  the  combined  obstruction.  The  equation  for  the  x 
component  is  > 
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and  the  y  component  is 


.  *y2 

N*1 

where  N  is  the  number  of  single  obstructions  making  up  the  combined  obstruction. 
E.  OVERWATCHING  FIRES 

Unless  being  used  as  a  nuisance,  or  as  harassment,  minefields  are  doctrinally 
covered  by  fire.  Actual  military  experience  has  indicated  that  a  minefield  covered  by 
fire  is  more  dangerous  to  the  attacking  force  than  the  combined  effect  of  the  mines 
and  fires,  each  inflicted  in  isolation  of  the  other.  In  other  words,  there  appears  to  be 
a  ^ergism  between  the  mines  and  the  overwatching  fires.  The  whole  is  greater  than 
the  sum  of  the  parts. 

As  a  possible  explanation  for  this  effect  consider  that  if  given  unlimited  time, 
mines  can  be  dealt  with  in  reasonable  safety.  The  risks  fi-om  the  mines  goes  up  with 
the  decrease  in  the  time  available  to  deal  with  them.  Overwatching  fires  serve  to 
make  the  environment  of  the  minefield  increasingly  lethal  over  time,  regardless  if  the 
vehicles  are  moving  or  not.  Therefore  the  combination  of  the  increased  lethality  of 
the  minefield  as  a  fimction  of  reducing  the  time  available  to  traverse  it,  and  the 
increased  lethality  of  overwatching  fires  as  a  fimction  of  increasing  the  time  exposed 
as  a  target,  results  in  greater  casualties  to  the  attacker. 

The  techniques  for  dealing  with  incoming  fire  generally  involve  movement.  In 
the  case  of  indirect  fires,  the  goal  of  an  attacking  force  is  to  move  out  of  the  area 
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where  the  fires  are  impacting.  In  the  case  of  direct  fires,  an  attacker  will  want  to  take 
cover  and  return  fire,  or  use  maneuver  to  close  with  and  destroy  the  enemy.  In  either 
case,  the  attacking  force  is  greatly  hampered  if  it  is  attempting  to  deal  with  incoming 
fires  while  at  the  same  time  negotiating  a  minefield. 

1.  Direct  Fires. 

The  model  allows  the  user  to  enter  the  number  of  red  overwatching  direct  fire 
elements  as  well  their  rate  of  fire,  and  a  separate  factor  which  combines  detection, 
acquisition,  and  engagement  times.  This  factor  is  actually  the  p  (mean)  parameter  of 
an  exponentially  distributed  random  draw  for  representing  a  time  period  to  be  added 
to  the  minimiim  time  required  to  prepare  the  ^tem  for  firing  (rate  of  fire).  A  direct 
fire  event  is  then  scheduled  to  occiu-  after  this  duration. 

Upon  the  actual  occurrence  of  the  direct  fire  event,  the  target  of  the  shot  is 
determined.  An  algorithm  based  upon  the  number  of  target  systems  actually  in  the 
minefield  is  used  to  determine  the  allocation  of  shots.  The  user  selects  the  proportion 
of  fires  to  be  allocated  to  the  first  of  n  vehicles  in  the  minefield.  The  remaining 
proportion  is  equally  divided  among  all  the  other  vehicles  ciurently  in  the  minefield 
\ising  the  relationship: 

Amount  of  Fixe 
dizected  at  each  , 
blue  vehicle,  2 
through  N 


(100-  %  fire  against  Posl) 


Table  3-1  illustrates  a  possible  series  of  proportions  for  a  fire  allocation  scheme. 
The  user  can  allow  disabled  vehicles  to  be  included  in  the  total  count  of  vehicles  in  the 
minefield  if  so  desired. 


TABLE  3-1  FIRE  ALLOCATION  SCHEME 


#  of  vehicles 
(n)in 
minefield 

■ 

2 

3 

1 

5 

6 

1 

8 

9 

%  of  fires 
directed 
against 
Vehicle  1 

100 

80 

70 

60 

50 

50 

50 

50 

50 

After  the  target  is  determined,  a  table  lookup  for  the  probability  of  kill,  p^,  given 
a  shot  for  this  particular  weapon/target  combination  is  performed,  a  random  draw 
conducted,  and  the  appropriate  result  carried  out.  If  the  vehicle  is  disabled  it  becomes 
an  obstruction  to  trailing  vehicles.  If  the  vehicle  survives  the  engagement  it  will 
continue  to  move.  The  firer  identification,  the  intended  victim,  the  time  and  location 
of  the  event,  and  the  result  can  be  recorded  as  output  data. 

When  the  direct  fire  event  for  the  red  overwatching  vehicle  has  been  completed, 
another  is  scheduled  to  occur  at  a  time  (time  to  prepare  round  to  fire)  +  (exponential 
delay)  in  the  future. 

2,  Indirect  Fires. 

This  version  of  the  model  currently  does  not  support  indirect  fires. 
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IV.  MODEL  DESCRIPTION 

The  methodologies  described  in  Chapter  III  have  been  coded  into  an  event  driven 
minefield  simulation  model.  This  chapter  contains  a  discussion  of  the  assumptions 
imder  which  the  model  was  developed,  a  description  of  the  model  inputs  and  outputs, 
and  a  synopsis  of  how  the  model  works.  The  descriptions  of  the  model  workings  are 
of  necessity  Cedrly  high  level,  as  the  model  is  quite  large  and  the  minute  details  are  not 
the  topic  of  this  thesis.  Documented  source  code  listings  can  be  found  in  Appendix  C. 

A.  ASSUMPTIONS  AND  MODEL  LIMITATIONS 

This  model  is  intended  as  an  implementation  of  the  minefield  interaction 
methodologies  previoiisly  disctissed.  The  purpose  of  the  model  (and  the 
methodologies)  is  to  duplicate  some  of  the  outcomes  of  real  world  interaction  between 
vehicles,  breachers,  overwatching  fires,  and  mines.  Several  assumptions  and 
simplifications  have  been  made  which  have  obvious  implications  with  regard  to 
transferring  the  model  results  to  real  world  applications. 

1.  Uniform  terrain 

A  mqjor  assumption  is  that  the  terrain  to  be  traversed  is  uniform  in  elevation 
and  in  all  applicable  soil  characteristics.  A  modeled  plow,  once  its  movement  velocity 
and  plowing  depth  have  been  determined,  moves  at  a  constant  speed  unless  a  status 
change  is  imposed  as  the  result  of  an  event.  In  the  real  world,  terrain  and  soils  are 
rarely  this  predictable,  and  in  the  event  that  they  were,  vehicle  operators  and  plow 
control  mechanisms  are  unlikely  to  maintain  either  constant  speed  or  constant  plow 
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depth.  The  impact  of  this  assiunption  is  that  the  variability  in  both  breaching  time 
and  plow  effectiveness  may  appear  smaller  than  what  would  be  expected. 

2.  Constant  vehicle  speed 

Vehicles  in  the  model  move  at  constant  speed  throughout  the  simulation  run. 
As  a  result  there  is  none  of  the  "accordion"  effect  between  the  vehicles  that  is  nearly 
impossible  to  avoid  in  real  world  situations.  Active  model  vehicles  never  get  closer  to 
each  other  than  the  interval  input  by  the  user  during  the  model  initialization.  The 
one  exception  to  this  statement  occurs  when  plowing  vehicles  are  set  to  operate  at  a 
speed  dictated  by  plow  width  and  depth.  In  that  case,  the  model  user  must  either 
adjust  the  interval  parameter  which  describes  the  initial  interval  between  the  plowfs) 
and  the  follow-on  vehicles,  or  adjust  the  velocity  of  the  trailing  force  to  insure 
collisions  do  not  occur  as  the  result  of  the  trailing  force  running  over  the  plow(s).  The 
model  ciurently  does  not  prevent  nor  react  to  active  vehicles  coming  into  physical 
contact. 

The  assumption  of  constant  vehicle  velocity  greatly  simplifies  the  movement 
calculations  and  is  probably  of  little  impact  if  the  actual  real  world  vehicle  interval  is 
anticipated  as  being  relatively  large  and  care  is  taken  in  the  selection  of  the  interval 
between  plows  and  trailing  vehicles. 

3.  Obscuration 

Obscurants  are  not  explicitly  modeled.  Since  any  real  world  opposed  breaching 
operation  is  likely  to  be  intensely  supported  with  smoke  operations,  this  is  a  large 
simplification.  Some  of  the  effects  of  obscuration,  in  particular,  vehicle  navigation  and 
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target  acquisition,  can  be  captured  by  careful  selection  of  the  parameters  used  in  the 
navigation  and  overwatching  fire  algorithms. 

4.  Breacher  Types 

The  only  breaching  technique  currently  modeled  is  plowing.  Since  numerous 
different  breaching  ^sterns  exist,  some  of  which  were  mentioned  in  Chapter  n,  this 
is  a  fairly  large  simplification  of  reality.  Since  the  model  is  only  intended  to  lay  the 
groundwork  for  a  high  resolution  minefield  maneuver  model,  this  shortcoming  may  be 
corrected  at  a  latter  date. 

5.  Mine  Types 

Only  three  t3rpes  of  mines  are  modeled,  and  all  three  tjrpes  are  of  a  fairly 
standard,  unsophisticated  nature.  Many  of  the  more  interesting  mines  under 
development  and  in  some  cases  currently  in  use,  are  veiy  sophisticated  and  vise  state 
of  the  art  technologies  and  exotic  engagement  and  fuzing  mechanisms.  The  maneuver 
methodologies  in  this  program  will  still  be  applicable,  but  the  code  for  capturing  the 
fuzing  and  mine  engagement  mechanisms  for  these  weapons  will  be  left  as  a  future 
enhancement. 

6.  Obstruction  Types 

Mobility  obstructions,  and  the  vehicles  that  must  negotiate  around  them,  are 
assumed  to  be  of  circular  geometry.  The  reality  is  that  obstructions  come  in  a  variety 
of  shapes  and  sizes,  and  that  vehicles  are  almost  never  circular.  However,  tracked 
vehicles  do  tend  to  move  in  straight  line  segments,  and  the  assvunption  of  a  circular 
geometry  allows  the  relatively  simple  calculation  of  a  series  of  straight  line  segments 
as  a  bypass  path. 
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What  is  lost  is  some  precision  in  the  actual  location  of  a  bypassing  vehicle 
relative  to  the  obstruction  as  a  function  of  the  actual  physical  dimensions  of  the 
vehicles  and  obstructions  being  modeled.  This  loss  of  precision  is  not  transferred  to 
the  mine  encoimter  calculations  as  those  are  strictly  a  fimction  of  the  actual  vehicle 
specifications,  mine  types  and  mine  locations. 

The  implementation  of  the  model  uses  the  circular  assiunption  to  generate  a 
hexagon  surroimding  the  obstruction  (see  Figure  3-6).  The  radius  of  the  circle  used 
is  the  sum  of  the  radius  of  the  obstruction  and  the  radius  of  the  vehicle.  A  hexagon 
computed  to  be  tangent  to  the  circular  obstruction  at  the  midpoint  of  each  of  its  six 
sides  is  then  calculated  as  the  centerline  of  the  vehicle  bypass  path. 

B.  PARAMETERS 

1.  Model  Input  Parameters 

The  model  allows  a  wide  range  of  scenarios  to  be  examined  easily  by  allowing 
most  of  the  model  parameters  to  be  changed  directly  from  the  input  screens.  The  use 
of  SIMGRAPHICS  has  made  possible  an  interactive  graphic  interlace  for  data  input. 
The  input  interface  consists  of  a  series  of  menus  displaying  default  input  values  that 
can  be  modified,  if  desired,  by  the  user.  A  \iseful  byproduct  of  using  SIMGRAPHICS 
for  the  input  interface  is  that  the  allowable  ranges  of  the  input  values  are  progranuned 
into  the  menus.  This  prevents  the  entering  of  input  values  outside  the  range  for 
which  the  model  is  designed.  A  list  of  the  modifiable  parameters,  and  their  effect. 


follows. 


a.  Mine  parameters 


•  Minefield  depth.  The  dimension  of  the  minefield  is  collected  as  minefield  depth. 
The  depth  is  important  as  it  impacts  directly  upon  the  amount  of  time  required 
to  breach  and  pass  through  the  minefield.  The  actual  width  of  the  minefield  is 
of  lesser  importance,  since  this  model  operates  imder  the  implicit  assumption 
that  a  breach  of  a  minefield  has  been  decided  on  as  the  course  of  action.  For 
display  purposes,  the  minefield  width  is  calculated  to  extend  for  a  width  equal 
to  the  s^ed  width  of  the  display  screen. 

•  Mine  radius.  The  model  treats  individual  mines  as  bodies  having  dimensions 
(specifically,  radius)  rather  than  simplifying  the  calculations  by  using  a  point 
mass  assumption.  The  user  is  given  the  opportunity  of  entering  a  specific  radius 
for  each  type  of  mine  modeled.  Each  mine  is  assumed  to  be  a  cylinder  with  a 
known  radius,  measmed  in  meters.  The  model  is  then  able  to  consider  the 
scenario  where  the  vehicle  track  encounters  only  part  of  the  mine. 

•  Mine  depth.  The  average  depth  of  a  mine,  measured  in  meters  from  the  surface 
down  to  the  top  of  the  mine  is  an  input.  In  the  case  of  an  unburied  mine,  the 
depth  is  zero.  The  depth  of  the  mine  will  determine  if  a  plow  working  at  a 
specific  depth  aer  ially  encoimters  the  mine. 

•  Reliability  of  the  mine.  The  probability  of  a  mine  detonation  given  that  the 
mine  has  been  encountered  by  a  vehicle  is  the  reliability  of  the  mine-  In  reality, 
this  parameter  is  a  complex  function  of  (at  least)  the  fiize  type,  the  amoimt  of 
time  the  mine  has  been  in  the  ground,  soil  type,  and  mine  design.  If  a  value  is 
not  known  for  this  input,  the  conservative  (and  default)  value  is  1.0. 

b.  Plow  parameters 

•  Plow  depth.  This  value  is  used  to  determine  if  the  plow  will  encounter  the 
mines  present  in  the  field  (when  compared  to  mine  depth).  The  plow  depth  will 
also  impact  upon  the  speed  with  which  the  plow  is  able  to  move  through  the 
minefield. 

•  Plow  width.  Plow  width  determines  how  wide  the  lane  made  through  the 
minefield  is.  The  width  of  the  lane  will  impact  on  the  abilify  of  trailing  vehicles 
to  stay  in  the  lane.  Like  plow  depth,  this  factor  impacts  upon  the  speed  with 
which  the  plow  will  be  able  to  move  Uirough  the  minefield. 

a  Plow  effectiveness.  This  is  the  probability  that  the  plow  will  remove  or 
neutralize  a  mine  which  it  physically  encounters.  Depending  upon  the  size  of 
the  mine  and  the  spacing  between  ^e  plow  tines,  it  is  possible  for  mines  that 
are  encoimtered  by  the  plow  to  filter  through  the  tines  instead  of  being  displaced 
to  the  side  of  the  lane.  A  mine  that  is  not  removed  or  neutralized  remains  in  its 
original  location  and  with  its  original  reliability. 
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e.  Vehide  parameten 

•  Track  width.  The  act\ial  width  of  vehicle  tracks.  This  parameter  will  iisually 
have  different  values  for  different  types  of  vehicles.  The  model  will  currently 
handle  up  to  five  different  vehicle  types.  The  track  width  is  used  to  determine 
the  pressure  footprint  of  the  vehicle. 

•  Vehicle  width.  This  is  the  actual  width  of  the  vehicle.  Again,  this  parameter  will 
usually  differ  from  vehicle  type  to  vehicle  type.  This  value  is  used  to  determine 
the  influence  footprint. 

•  Vehicle  length.  The  actiial  length  of  the  vehicle.  This  value  is  used  as  part  of 
the  calculations  for  computing  the  vehicle  radius  which  is  used  in  the  circle 
approximation  of  the  vehicle  area 

•  Vehicle  radius.  This  is  currently  not  a  direct  user  input  value.  For  the  purposes 
of  bypassing  obstructions,  the  model  approximates  both  obstructions  and 
bypassing  vehicles  as  a  circle.  Since  the  only  types  of  obstructions  currently 
implemented  in  the  model  are  disabled  vehicles,  this  value  is  also  used  to 
determine  the  size  of  the  obstructions.  The  radius  of  vehicles  and  obstructions 
are  used  to  determine  the  distance  bypassing  vehicles  must  travel  in  order  to  get 
aroimd  them.  Currently,  the  radius  of  a  vehicle  is  a  calculated  value,  found  by 
multiplying  the  vehicle  length  by  the  vehicle  width,  and  then  solvmg  for  the 
radius  of  a  circle  which  has  that  same  area. 

•  Vehicle  speed.  This  is  the  value  used  to  determine  how  fast  a  vehicle  will  move 
through  the  minefield.  The  model  currently  treats  vehicle  speed  as  a  constant. 
The  plow  vehicle’s  speed  is  a  function  of  the  width  of  the  plow  and  the  depth  of 
the  cut  it  makes  in  the  ground. 

•  Vehicle  navigation  accuracy.  This  parameter  is  an  attempt  to  determine  how 
closely  a  trailing  vehicle  follows  in  the  footprints  of  previous  vehicles, 
particularly  the  first  (plow)  vehicle.  Ideally,  a  trailing  vehicle  would  follow 
exactly  in  the  footprints  of  the  lead  vehicle.  However,  as  was  explained  in 
Chapter  n,  this  is  rarely  the  case.  When  a  trailing  vehicle  deviates  from  the 
footprints  of  the  leader,  it  leaves  an  area  of  near  zero  mine  density  and  enters 
an  area  of  reduced,  fUU,  or  increased  mine  density.  This  decreases  the 
probability  of  survival  for  each  trailing  vehicle  and  for  ^e  formation  as  a  whole. 
This  parameter  is  entered  as  the  value  of  the  standard  deviation  of  the  x 
coordinate  at  each  checkpoint  in  the  movement  path. 

d.  Oomixttdi  paramdm 

•  NumW  of  overwatchers.  The  number  of  red  direct  fire  overwatching  ^tems 
for  the  scenario  being  run.  When  the  model  is  being  run  in  graphics  mode  these 
elements  are  depicted  at  the  top  of  the  screen,  but  this  location  does  not 
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represent  their  tactical  placement.  It  is  only  an  arbitrary  placement  for  display 
purposes. 

•  Type  of  overwatchers.  The  model  currently  plays  only  one  type  of  overwatching 
system. 

•  Rate  of  fire.  This  parameter  represents  the  actual  rate  of  fire  of  the  red  system 
as  a  function  of  reload  and  system  (ycle  times.  It  is  input  by  the  user  and 
treated  as  a  constant  by  the  program. 

•  Acquisition  rate.  This  parameter  is  actually  intended  as  a  combination  of 
detection,  acquisition  and  engagement  times  for  the  overwatching  ^sterns.  The 
value  entered  is  the  mean,  p,  of  a  random  sample  from  an  exponential 
distribution. 

&  Taskforce  parameters 

•  Number  of  full  width  plows.  The  number  of  full  width  plows  which  will  be  used 
to  make  the  breach.  The  first  plow  or  vehicle  has  no  navigation  error,  as 
navigation  error  is  defined  as  deviation  from  the  pressure  or  influence  footprints 
of  the  lead  vehicle.  Any  subsequent  plows  and  vehicles  implement  the 
navigation  error  methodology.  Subsequent  plows  are  offset  approximately  one 
third  vehicle  width  to  either  side  of  the  lead  plow  in  order  to  widen  the  effective 
lane  through  the  minefield. 

•  Number  nf  track  width  plows.  This  parameter  is  the  number  of  track  width 
plows  used  to  make  the  breach. 

•  Number  of  type  1  tracks.  This  is  the  munber  of  tracked  vehicles  of  specific  type 
1.  The  model  will  accept  values  ranging  from  1  to  15  for  this  parameter,  but  the 
larger  the  munber  the  slower  the  graphics  version  will  nm.  An  additional 
consideration  is  that,  depending  upon  the  lethality  of  the  scenario  and  the  size 
of  the  minefield,  the  number  of  disabled  vehicles  (if  excessive)  may  cause 
"gridlock”  where  the  size  of  the  resulting  obstruction  is  larger  than  the 
boundaries  of  the  minefield.  Actually,  it  is  unlikely  that  any  unit  commander 
would  willingly  put  more  than  a  dozen  vehicles  or  so  down  a  single  lane  of  an 
assault  breach.  Test  cases  have  shown  no  difficulty  in  handling  breaching  forces 
of  up  to  10  vehicles,  but  no  predictions  are  made  for  more  extreme  cases. 

•  Numhar  of  tvpe  2  tracks.  The  number  of  tracked  vehicles  of  specific  type  2. 
Just  as  for  the  type  1  tracks,  the  model  will  accept  and  attempt  to  run  with  up 
to  16  type  2  tracks.  The  same  cautions  apply. 

e  Number  of  Hrpa  .q  trarka,  The  number  of  tracked  vehicles  of  a  specific  type.  The 
same  cautions  apply. 
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•  Interyal  between  plows  and  tracks.  This  parameter  allows  the  user  to  specify  a 
distance  between  the  breaching  vehicles  and  the  trailing  assault  force.  It  differs 
from  the  interval  between  vehicles  in  that  it  allows  separation  of  the  breaching 
vehicle(s)  from  the  vehicles  that  are  merely  trying  to  get  through  the  minefield. 
This  parameter  was  implemented,  tmder  the  assiunption  that  the  tactical 
commander,  dvuing  a  breaching  operation,  would  not  want  to  place  combat 
vehicles  in  the  minefield  until  a  lane  had  been  completed,  or  at  least  vintil  all 
other  efforts  to  provide  a  lane  had  been  exhausted.  If  this  parameter  is  set  to 
zero,  then  the  model  uses  the  interval  between  vehicles  for  all  elements. 

•  Interval  between  vehicles.  This  parameter  is  used  to  determine  the  distance 
between  vehicles  moving  single  file  through  the  minefield.  Once  set,  it  remains 
constant  throughout  a  simulation  run. 

f.  Tables 

•  Vehicle  versus  Mine  Table.  The  model  allows  the  vehicle  type  versiis  mine 
type  probability  of  kill  table  to  be  edited  during  the  initialization  phase.  Distinct 
p^s  may  be  entered  for  each  vehicle  type/mine  type  combination. 

•  Red  Overwatching  Fire  versus  Vehicle  Table.  The  table  of  probability  of  kill 
given  shot  table  for  red  overwatching  systems  versus  blue  taskforce  vehicles  can 
be  edited  during  the  initialization  portion  of  a  model  run. 

•  Direct  Fire  Allocation  Table.  This  table  allows  the  user  to  determine  the 
proportion  of  direct  fire  shots  that  will  be  allocated  to  the  lead  vehicle 
attempting  to  negotiate  the  minefield.  Fires  not  allocated  to  the  lead  vehicle  are 
distributed  equally  to  any  other  vehicles  that  happen  to  be  in  the  minefield  at 
the  time  of  the  shot. 

g.  AdaUnistratioe  parameters 

•  Interval  between  checkpoints.  The  interval  between  navigation  checkpoints  can 
be  set  during  the  initialization  portion  of  a  model  run.  The  value  entered 
impacts  on  how  taskforce  vehicle  navigation  error  is  played,  as  the  y  coordinate 
of  each  navigation  checkpoint  is  a  direct  function  of  the  distance  between 
checkpoints.  The  smaller  the  interval,  the  more  navigation  checkpoints  the 
vehicle  wiU  negotiate  in  the  course  of  moving  a  specific  distance.  For  each 
checkpoint,  a  navigation  error  in  the  x  dimension  is  calculated. 

•  Graphics  on  or  off.  The  graphics  option  provides  a  valuable  means  of  validating 
the  model  and  of  displaying  the  results  of  a  scenario.  However,  the  use  of 
graphics  precludes  the  timely  collection  of  multiple  iteration  results.  To  avoid 
this  problem  a  switch  is  provided  on  the  input  menu  which  allows  the  user  to 
turn  the  graphics  off.  This  action  significantly  reduces  the  model  run  time  (by 
at  least  an  order  of  magnitude). 
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•  Nvimber  of  iterations.  The  model  may  be  set  to  nm  multiple  iterations  with  the 
same  input  data.  For  multiple  iterations  a  mean  and  variance  are  calculated  for 
the  output  elements.  The  number  of  runs  is  set  during  the  initialization  portion 
of  a  model  nm.  If  this  value  is  greater  than  one  then  the  model  graphics  are 
automatically  tiumed  off. 


2.  Outputs 

Several  values  are  produced  as  outputs  by  the  model.  Additionally,  routines  exist 
to  capture  the  values  of  various  data  arrays  within  the  model  for  validation  purposes. 
All  input  values  are  recorded  as  part  of  the  output  file,  to  include  the  initial  seeds  used 
in  the  random  number  generators.  The  output  values  currently  produced  are; 


•  Mina  danwitv  This  value  is  expressed  in  terms  of  the  number  of  mines  present 
by  type  per  meter  of  front  (linear  density)  and  by  the  number  of  mines  by  type 
per  square  meter  of  minefield  area  (area  density).  Linear  density  is  the  average 
number  of  mines  contained  in  a  meter  wide  strip  through  the  mine  field  in  the 
direction  of  formation  movement.  Area  density  is  the  average  number  of  mines 
per  sqi^e  meter  of  mined  area.  Mine  density  is  of  critical  importance  in 
determining  the  effectiveness  of  the  mine  clearer. 

•  Minas  displaced  bv  plow.  This  output  is  expressed  as  the  number  of  mines 
displaced  by  plows  during  a  model  run. 

•  Mina  kills  hv  mina  tvpa.  This  output  is  expressed  as  the  number  of  mine  kills 
by  mine  type  and  by  vehicle  status.  Vehicle  status  is  expressed  as  either  in 
normal  mode  or  bypass  mode. 

•  Red  overwatch  shots  fired.  This  value  is  the  total  number  of  shots  fired  by  red 
direct  fire  overwatching  systems  during  a  scenario  run. 

e  Red  overwtffh  kill*-  This  value  is  the  total  number  ofvehide  kills  generated  by 
the  red  direct  fire  overwatching  systems. 

e  Tima  nf  daatli.  Tbe  time  of  death  of  any  taskforce  element  is  recorded  and 
available  as  an  output 

e  Time  of  comnletion.  For  each  vehide  surviving  the  breaching  effort  the  time 
it  completed  the  traversing  the  lane  is  recorded  and  available  as  an  output 
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C.  THE  MODEL 

Figure  4-1  is  a  flow  diagram  of  the  encoimter  event  logic  used  in  the  model. 

1.  Events 

Two  types  of  events  occur  within  the  model.  The  first  type,  hereafter  called 
"encounter”  events,  are  composed  of  those  events  which  take  place  as  a  result  of 
vehicle  movement.  The  second  type  of  event,  hereafter  labeled  "fire"  events,  are  made 
up  of  those  events  which  take  place  regardless  of  vehicle  movement. 

a  Encounter  a)eiits 

There  are  three  types  of  encounter  events.  They  are  navigation 
checlq>oint  encounters,  henceforth  caUed  cp  encounters,  mine  encounters,  and 
obstruction  encounters. 

There  are  fotir  varieties  of  cp  encounters.  These  are  initial  checkpoint 
encounters,  movement  checkpoint  encounters,  bypass  checkpoint  encounters,  and  final 
checkpoint  encoimters.  CP  encoimters  are  used  to  monitor  and  control  the 
navigation  of  the  taskforce  throiigh  the  minefield.  All  taskforce  vehicles  start  at  their 
respective  initial  checkpoints.  Ibe  time  of  arrival  at  an  initial  checkpoint  is 
determined  by  the  vehicles  place  in  the  column,  vehicle  speed  and  the  interval 
between  vehicles.  Movement  checkpoints  occur  at  user  q>ecified  intervals  and  when 
connected  by  line  equations,  make  up  each  vehicles  movement  path.  At  each 
movement  checkpoint  the  path  eqiiation  used  to  determine  the  exact  location  of  the 
vehicle  changes.  Bypass  checkpoints  serve  a  similar  function,  however  they  are 
calculated  as  needed  and  then  spliced  onto  the  original  movement  path.  Upon 
reaching  the  final  checkpoint  the  vehicle  has  successfully  negotiated  the  minefield. 
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Mine  encounters  occur  when  the  movement  or  bypass  path  and  the 
physical  dimensions  of  a  vehicle  are  combined  with  the  location,  size  and  fuzing 


mechanism  of  a  mine  resulting  in  an  engagement. 

Obstruction  encounters  can  occur  only  after  at  least  one  vehicle  has  been 
disabled,  with  at  least  one  vehicle  trailing  it  (the  disabled  vehicle).  An  obstruction 
encoimter  initiates  the  generation  of  a  bypass  map  consisting  of  the  bypass 
checkpoints  necessary  for  the  trailing  vehicle  to  bypass  the  obstruction. 

Each  vehicle  has  a  maximum  of  one  encounter  event  on  the  event  calendar 
at  any  instant  in  time.  Disabled  vehicles  no  longer  generate  encounter  events.  When 
an  encounter  event  is  taken  off  of  the  calendar  and  completed,  a  new  encounter  event 
for  that  vehicle,  if  appropriate,  is  determined  and  scheduled. 

This  is  done  by  a  routine  named  NEXT  J^COUNTER  which  performs  a 
function  call  to  each  of  three  different  routines,  named  DISTANCE.TO.CP, 
DISTANCE.TO.MINE,  and  DISTANCE.TO.OBS.  Each  of  these  routines 
determines  the  distance  between  the  calling  vehicle  and  its  next  encounter  of  each 
respective  type.  The  routines  then  return  the  distance,  and  if  appropriate, 
identification  of  the  encountered  entity  (mine  ID,  or  obstruction  ID)  to  the 
NEXT.ENCOUNTER  routine.  NEXT^ENCOUNTER  then  compares  the  distances 
and  determines  which  event  is  most  eminent.  A  call  is  then  made  to  the  routine 
DELTA.TIII1IE  vdiich  computes  and  returns  the  time  it  will  take  that  vehicle,  moving 
at  its  constant  speed,  to  move  the  appropriate  distance.  NEXT.ENCOUNTER  then 
schedules  the  next  event  for  that  vehicle,  either  a  NEW.CP,  MINE.ENCOUNTER, 
or  OBSTACLEJ^COUNTER,  at  that  time  in  the  futiire. 
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This  process  will  continue  until  all  taskforce  members  have  been  disabled 
or  have  reached  their  final  navigation  checkpoints.  The  only  encoimter  event  which 
can  disable  a  vehicle  is  a  mine  encounter.  If  a  vehicle  is  disabled  during  a  mine 
encounter,  a  routine  called  CALENDAR.UPDATE  is  used  to  remove  all  encounter 
events  from  the  event  calendar.  This  is  done  to  prevent  events  from  occurring  which 
may  no  longer  be  valid.  After  all  encounter  events  have  been  removed  the  routine 
causes  each  active  element  to  redetermine  and  reschedule  its  next  event. 

b.  Fireeomta 

There  are  two  types  of  fire  events.  Direct  fire  events  and  indirect  fire 
events.  Direct  fire  events  are  those  events  that  take  place  in  a  simulated  line  of  sight 
mode  where  the  firer  is  assumed  to  be  able  to  see  the  target  being  fired  upon.  Each 
red  direct  fire  overwatch  system  will  have  only  one  fire  event  on  the  event  list  at  any 
time.  Direct  fire  events  will  not  be  directed  at  a  specific  vehicle  until  the  event  is 
removed  from  the  event  list.  At  that  time  the  routine  D1RECT.FIKE  determines  the 
act\ud  target  using  the  fire  allocation  algorithm  previously  discussed  and  resolves  the 
engagement.  There  may  be  multiple  direct  fire  events  apportioned  to  the  same  target 
vehicle,  but  only  one  per  firing  vehicle  at  any  one  time. 

Indirect  fire  events  refer  to  the  use  of  simulated  artillery,  where  the  firer 
is  actually  attempting  to  hit  a  spot  on  the  ground.  Having  a  line  of  sight  to  the  target 
is  not  required  or  expected.  Multiple  indirect  fire  events  may  be  on  the  event  list,  but 
they  are  directed  at  impact  points  and  not  specific  vehicle  entities. 
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Should  a  vehicle  be  disabled  by  direct  or  indirect  fire, 
CALENDAR.UPDATE  is  again  called  in  order  to  clear  the  calendar  of  encounter 
events  and  reschedule  encounter  events  for  all  active  vehicles. 
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V.  EXAMPLE  PROBLEM 


This  chapter  documents  a  demonstration  of  the  model  through  the  use  of  an 
example  problem.  One  of  the  issues  that  has  arisen  during  the  design  of  the  new 
Combat  Mobility  Vehicle  concerns  the  choice  of  an  appropriate  width  for  the  blade 
attached  to  the  front  of  the  vehicle.  The  blade  may  be  used  for  a  variety  of  purposes, 
including  as  a  plow  for  the  breaching  of  minefields. 

As  discussed  in  Chapter  n,  the  utility  of  a  plow  blade  is  dependent  on  tradeoffs 
made  between  the  effectiveness  of  the  lane  created  by  its  use  and  the  survivability  of 
the  breaching  vehicle.  Intuitively,  the  wider  the  blade,  the  more  dirt  the  vehicle  must 
push,  and  the  slower  the  vehicle  will  be  able  to  move.  If  the  lane  is  not  wide  enough 
to  be  safely  negotiated  by  the  trailing  vehicles,  then  one  or  more  of  them  may  become 
disabled  by  a  mine,  thereby  blocking  the  lane.  Finally,  the  longer  any  vehicle  remains 
exposed  to  overwatching  fires  while  in  the  minefield,  the  more  likely  the  event  of  its 
being  disabled. 

To  demonstrate  the  potential  utility  of  this  model  with  regard  to  examining  the 
effects  of  parameter  changes  on  the  scenario  outcome,  the  following  test  case  is 
presented. 

A.  SCENARIO 

The  purpose  of  this  scenario  will  be  to  evaluate  the  impact  of  mine  plow  width 
on  the  number  of  casualties  inflicted  upon  a  taskforce  conducting  the  breach  of  a 


58 


minefield.  There  are  many  variables  which  will  impact  on  the  results  of  a  minefield 
breaching  operation.  The  ones  included  in  this  scenario  are; 

•  the  density,  depth  and  makeup  of  the  minefield, 

•  the  volume  and  accuracy  of  overwatching  direct  fires, 

•  the  width  of  the  cleared  lane  made, 

•  the  speed  of  the  breacher, 

•  and  the  navigation  accuracy  of  the  trailing  taskforce. 

1.  The  Minefield 

The  scenario  minefield  is  a  surface  laid,  scattered  minefield.  Scattered  refers  to 
the  fact  that  the  mines  are  placed  randomly,  using  a  vmiform  distribution,  within  a 
minefield  of  50  meters  depth  and  150  meters  width.  Three  t}q;>es  of  mines  will  be 
modeled  in  the  makeup  of  the  field.  Table  5-1  shows  the  typ<^,  radius  and  probability 


of  kill  parameters  used  for  the  mines  in  this  scenario. 
TABLE  5-1  MINE  DATA 


Mine  Type 

Linear  Mine 
Density 

Radius  of 
Mine 

Pfc  vs 

Full  Plow 

Pi,  vs 
Track 

I  Pressure  f  .2 

.1  m 

.06 

.9 

Influence 

.1 

.1  m 

.05 

.9 

Contact 

.025 

.1  m 

.5 

.9 

2.  The  Taskforce 

The  attacking  force  will  consist  of  one  full  width  blade  breacher  and  five  tracked 
vehicles  for  a  total  of  six  vehicles.  A  baaeline  case  will  also  be  run  in  which  a  taskforce 
consisting  of  six  tracked  vehicles  with  no  plow  will  attempt  to  negotiate  the  minefield. 
Table  6-2  displays  the  model  input  parameter  characteristics  of  the  breaching  force. 
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TABLE  5-2  VEHICLE  DATA 


Width 

Length 

Track  Width 

Nav.  Error 

Speed 

Plow 

3.48m 

9.03  m 

.635  m 

none 

varied 

Track 

3.48m 

9.03  m 

.635  m 

.5  m 

10  kph 

3.  Plowing 

The  actual  amount  and  type  of  force  used  by  a  prime  mover  to  push  a  plow  is  a 
complex  function  of  soil  type,  plow  design,  and  plowing  depth.  The  forces  involved  can 
be  divided  into  two  categories;  the  system  tractive  forces,  and  the  plow  draft  forces. 
These  forces  are  defined  as  follows. 

System  tractive  force  -  The  amoimt  of  force  exerted  by  a  prime  mover  against 
a  given  soil  that  can  be  used  for  maneuverability /mobility  (turning,  climbing, 
accelerating,  etc.).  This  includes  the  amount  of  force  the  soil  is  able  to  generate 
as  resistance  versus  the  amount  of  force  generated  by  the  prime  mover. 

Plow  draft  force  •  The  amount  of  force  applied  to  plow  tines,  skids,  and 
moldboards  to  conduct  plowing  operations  in  a  given  soil.  [Ref  5.  p  IV'3] 


Simplifying  the  problem  of  plow  draft  force  considerably,  we  make  the  statement 
that  imder  a  given  set  of  conditions,  the  faster  the  plow  is  pushed,  the  greater  the 
draft  force  required.  The  relationship  between  plow  draft  force  and  prime  mover 
velocity  is  roughly  linear. 

Continuing  to  simplify,  we  make  the  statement  that  with  regard  to  tractive  force, 
vmder  a  given  set  of  conditions,  the  faster  the  plow  is  pushed  the  less  tractive  force  is 
available.  The  relationship  between  tractive  force  and  velocity  is  not  linear. 

The  draft  force  required  to  move  the  plow  is  subtracted  from  the  tractive  force 
available  to  the  prime  mover.  A  positive  net  tractive  force  is  necessary  if  the  prime 
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mover  is  to  move  forward.  This  means  that  no  matter  how  much  horsepower  the 
prime  mover  has  available,  there  is  a  point  where  the  ambient  conditions  will  not 
permit  an  increase  in  the  forward  velocity  of  the  plow.  The  prime  mover  will  be 
simply  "spinning  it’s  wheels". 

Figure  5-1  illustrates  the  relationship  between  velocity  and  both  draft  and 
tractive  forces.  Figme  5-1  was  derived  from  data  extracted  from  a  study  done  on  the 
engineering  development  of  a  mine  clearing  plow  system  [Ref  8.  p.IV-14].  The 
intersections  between  the  tractive  force  and  draft  force  lines  are  the  points  where 
further  increases  in  velocity  are  not  possible.  The  abbreviation  TWMP  stands  for  track 
width  mine  plow  and  FWMP  stands  for  full  width  mine  plow. 
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It  is  apparent  that  any  specified  prime  mover  will,  imder  stipulated  soil 
conditions,  be  able  to  move  a  designated  plow  at  a  certain  maximum  velocity.  This 
point  will  be  the  intersection  of  the  draft  forces  and  the  tractive  forces  generated 
under  the  aforementioned  soil  conditions.  The  calculations  and  computer 
programming  required  to  calculate  this  point  under  any  reasonable  variety  of  soil 
conditions  and  vehicle  configurations  are  of  sufficient  magnitude  to  be  the  subject  of 
several  volumes.  For  this  example,  we  will  simplify  the  situation  by  using  the  values 
in  Table  5-3  for  the  maximum  velocity  of  our  plowing  ^tem  under  the  given  plow 
width. 


TABLE  5-3  PLOW  DATA 


System 

2 

3 

4 

5 

Plow  Width  (m) 

6.0 

6.6 

6.0 

6.5 

Velocity  (lq>h) 

1  8.0 

6.0 

4.6 

3.8 

2.8 

4.  Red  Overwatch 

The  red  force  overwatching  the  minefield  will  consist  of  a  single  red  direct  fire 
system  which  will  have  a  rate  of  fire  of  one  roimd  every  30  seconds,  and  a  mean 
acquisition  rate  of  one  target  every  40  seconds.  The  overwatching  system  will  not 
begin  attempting  to  acquire  a  target  imtil  the  system  is  prepared  to  fire.  This  means 
that  rate  of  fire  end  time  to  acquire  are  treated  as  separate,  non-overlapping  periods 
of  time.  The  time  period  between  successive  shots  is  the  smn  of  these  two  periods  of 
time.  The  p^  given  a  shot  will  be  .20  afi^dnst  both  plows  and  tracks. 


B.  TEST  PLAN 

The  goal  is  to  examine  the  number  of  taskforce  casualties  resulting  from  a 
breaching  attempt  as  a  function  of  plow  width.  The  minefield  model  will  address  this 
goal  by  holding  most  parameters  constant,  varying  only  the  plow  width  and  the 
associated  speed  of  the  plowing  vehicle.  The  interval  between  the  plow  and  the 
trailing  vehicles  will  be  set  for  300  meters,  a  value  sufficient  to  prevent  taskforce 
vehicle  collisions  under  the  described  scenario. 

The  mean  number  of  casualties  for  each  plow  configuration  will  be  determined 
for  120  iterations  of  the  model.  A  baseline  scenario  will  be  run  with  no  plow  ^tem 
in  order  to  determine  the  benefit  derived  from  having  a  plowing  system.  Vehicle 
casualties  will  be  subdivided  into  mean  casualties  caused  by  mines,  mean  casiialties 
caused  by  direct  fires,  and  mean  casualties  caused  by  mines  while  bypassing 
obstructions  (a  subset  of  mean  casualties  caused  by  mines).  The  mean  values  will  then 
be  examined  to  determine  if  differences  are  apparent  and  to  see  if  the  model  results 
make  sense. 

The  distribution  of  casualty  counts  will  be  determined  over  each  group  of  120 
iterations.  The  number  of  casualties  by  vehicle  position  in  the  taskforce  column  will 
also  be  collected  and  presented.  Finally,  the  survival  rate  of  the  different  plow 
configurations  will  be  determined  and  displayed. 

C.  PROBLEM  RESULTS 

Figure  5-2,  presents  the  mean  casualties  inflicted  during  120  iterations  for  each 
of  the  qrstem  configurations.  The  trend  lines  support  the  original  reasoning  with 
regard  to  the  consequences  of  plow  velocity  and  lane  width.  Note  that  the  ”no  plow” 
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Figure  5-2 


scenario  results  in  the  most  mine  inflicted  casualties  and  the  most  total  casualties. 
Casualties  from  direct  fire  go  up  with  the  decrease  in  breacher  speed  (increase  in  plow 
width).  As  plow  width  increases,  the  number  of  mine  casualties  initially  goes  down, 
but  as  direct  fire  casualties  rise,  so  do  the  mine  casualties,  particularly  those  mine 
casualties  inflicted  during  the  conduct  of  obstruction  bypassing.  Another  cause  for  the 
rise  in  mine  casualties  may  be  the  destruction  of  the  plow  by  direct  fire  prior  to  the 
completion  of  the  breach. 

The  results  indicate  that  under  the  given  conditions,  either  Plow  2  (6.0  meters 
wide)  or  Plow  3  (5.6  meters  wide)  would  result  in  the  fewest  overall  taskforce 
casualties. 
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Figure  5-3  depicts  the  distribution  of  taskforce  casualties  results  over  the  120 
iterations.  The  values  generated  do  not  contradict  the  expected  results.  The  results 
also  indicate  that  any  plow  q^tem  is  better  than  attempting  to  negotiate  the  minefield 


with  no  plow. 
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Figure  5-3 

Figure  5-4  displays  the  number  of  iterations  resulting  in  vehicle  casualties  at 
specific  vehicle  positions  in  the  taskforce  column.  If  present,  the  breacher  will  always 
be  the  first  vehicle  in  the  column.  As  expected,  the  slower  the  breacher  moves,  the 
greater  the  chance  it  will  become  a  casualty. 


66 


Model  Run  Results 

120  Iterations 
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Figure  5-4 

Figure  5-5  emphasizes  this  point  by  showing  the  actual  survival  rates  for  the  five 
different  plow  configurations  as  a  restUt  of  vehicle  velocity,  which  equates  to  the 
amount  of  time  spent  exposed  in  the  minefield. 

Actual  studies  to  determine  the  appropriate  plow  width  would  entail  examination 
of  a  much  greater  selection  of  soil  types,  minefield  configurations,  and  overwatching 
fire  conditions.  Also,  this  example  uses  fairly  small  sample  sizes.  Any  study  intended 
for  actual  design  decisions  should  include  a  larger  number  of  scenario  iterations. 

This  example  demonstrates  the  potential  utility  of  the  methodologies  and  the 
model  for  examining  the  problems  associated  with  minefield  breaching  operations. 
The  model  may  be  particxilarly  useful  for  examining  complex  problems  that  have  no 
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Figure  5-5 


dosed  form  solution  and  for  which  the  costs  and  hazards  of  actual  testing  are 
prohibitive. 
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VI.  CONCLUSIONS  AND  RECOMMENDATIONS 

A.  RESULTS 

The  methodologies  and  algorithms  presented  in  this  model  provide  a  good 
foundation  for  the  effective  high  resolution,  high  fidelity,  modeling  of  the  dynamics 
involved  in  the  traversal  of  minefields. 

The  model  is  highly  portable.  The  program  was  written  and  tested  on  an  IBM 
PC  compatible  computer,  and  has  been  run  on  both  the  80286  and  80386  ^sterns. 
The  primary  portability  limitation  is  the  availability  of  the  SIMSCRIPT  programming 
environment.  Further  details  concerning  ^tem  requirements  are  provided  in 
Appendix  A. 

The  model  is  entirely  menu  driven,  allowing  the  user  to  change  any  of  the  input 
parameters  without  editing  a  file.  The  range  of  allowable  input  values  is  controlled  by 
the  SIMGRAPHICS  input  forms.  The  model  outputs  are  automatically  written  to  a 
data  file  for  study  and  analysis. 

The  model  is  written  in  SIMSCRIPT  and  includes  the  icons  and  coding  to  run 
using  SIMGRAPHICS.  The  graphics  are  a  user  option  that  is  turned  off  should  the 
user  decide  to  run  multiple  iterations  in  a  single  session.  The  use  of  SIMGRAPHICS 
provides  a  visual  validation  of  the  model  and  of  the  model  results.  Users  will  have 
added  confidence  of  being  able  to  see  how  the  model  arrives  at  its  results. 

An  unfortunate  limitation  of  the  SIMGRAPHICS  feature  is  that  it  is  specific  to 
the  machine  environment  in  which  it  was  developed.  This  means  that  the  graphics 
in  this  model  will  only  work  on  a  DOS  system  based  machine.  A  list  of  the  icons  as 
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well  as  a  figure  depicting  each  one  is  provided  in  Appendix  D  to  allow  users,  interested 
in  transporting  the  model  to  a  different  ^tem  environment,  a  template  for  the  icon 
construction. 

The  resulting  model  provides  a  basic  high  resolution  modeling  capabUity  for  the 
study  of  minefield  dynamics  with  potential  utUity  in  either  countermobility  or  mobility 
studies.  The  model  can  be  used  for  both  offensive  and  defensive  scenarios  and  has  a 
built  in  capability  to  examine  a  wide  range  of  "what  iT  scenarios.  The  model  also  has 
potential  as  an  optimization  tool  to  examine  such  issues  as  optimum  plow  widths  and 
optimum  mine  densities/mixes. 

The  use  of  the  model  as  a  low  level,  high  resolution  modeling  tool,  allows  the 
user  to  collect  a  wide  range  of  minefield  breaching  data,  providing  the  militaiy  modeler 
with  a  capability  to  "validate*  the  minefield  breaching  portions  of  higher  level,  lower 
resolution  military  models.  For  example,  as  a  high  resolution  model,  the  program  can 
be  used  to  determine  expected  unit  delays  and  vehicle  attrition  as  the  result  of  an 
encounter  with  a  specific  type  of  minefield.  These  outcomes  can  then  be  used  to 
eval\iate  the  performance  of  higher  level  models  to  determine  if  the  delays  and 
casualty  assessments  they  impose  are  reasonable,  or  the  results  can  be  used  as  data 
for  the  higher  level  models. 

B.  FUTURE  ENHANCEMENTS 

This  model  has  been  designed  to  allow  ea^  modification  of  many  of  the  model 
inputs.  In  addition,  basic  tools  and  functions  are  provided  that  allow  for  the  easy 
addition  of  additional  minefield  objects.  Possible  improvements  include  adding 


additional  breaching  options  such  as  mine  rollers,  line  charges,  and  flails.  Additional 
minefield  feat\ires  might  include  patterned  minefields,  multiple  lanes,  blue 
overwatching  fires,  antitank  ditches,  obscurants,  and  some  of  the  more  modem  mine 
t3^es.  The  addition  of  indirect  fires  to  the  overwatching  fires  as  well  as  the  ability  to 
modify  the  rate  of  overwatching  Hres  as  a  function  of  time  should  also  be  considered 
as  a  future  enhancement. 
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APPENDIX  A  -  SYSTEM  REQUIREMENTS 


The  model  is  written  in  SIMSCRIPT  II.5»,  a  free-form,  English-like,  general 
purpose  simulation  programming  language.  SIMSCRIPT  II.5  is  a  product  of  the  CACI 
Products  Company.  The  model  also  makes  use  of  SIMGRAPHICS,  a  companion  product 
which  allows  programs  written  in  SIMSCRIPT  II.5  to  include  animated  interactive 
graphics. 

Running  the  model  requires  SIMSCRIPT  11.5  to  be  installed  on  the  machine. 
Running  the  SIMSCRIPT  compiler  on  a  PC  requires  a  math  coprocessor  and  at  least 
640K  of  memory.  The  graphics  have  been  rxm  on  both  an  EGA  and  a  VGA  monitor 
with  no  difficulty. 

The  model  was  developed  on  an  IBM  clone  286  machine,  nmning  at  16  MHZ, 
with  a  math  coprocessor,  and  VGA  graphics.  The  source  code  is  claimed  by  CACI  to  be 
portable  over  a  wide  range  of  systems  with  only  minor,  system  specific  modifications 
required. 

The  graphics,  unfortunately,  will  not  transfer  to  a  non-DOS  environment. 
Should  the  user  desire  to  operate  the  program  on  some  other  t3q>e  of  sjrstem  which 
supports  graphics,  a  SUN  workstation  for  example,  it  will  be  necessary  to  recreate  the 
graphic  images  (icons)  and  input  displays  (forms)  stored  as  part  of  the  program  using 
the  system  specific  SIMGRAPHICS  software.  A  list  of  icons  used  and  figure  for  each 
is  included  in  Appendix  D.  Additionally,  paper  copies  of  the  input  forms  are  provided. 
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APPENDIX  B  -  RUNNING  THE  MODEL 


This  appendix  contains  instuctions  for  running  the  model  and  copies  of  the 
SIMGRAPHICS  forms  used  to  modify  the  model  inputs.  The  input  forms  are  included 
because  although  SIMSCRIPT  code  will  run  on  a  variety  of  computer  systems,  the 
SIMGRAPHICS  portion  of  the  code  is  unique  to  the  type  of  computer  ^tem  the 
graphics  were  generated  on.  To  allow  users  the  ability  to  recreate  the  forms  on  their 
specific  platforms,  they  are  reproduced  in  hard  copy  here.  The  character  strings 
contained  in  brackets  ”<  >"  are  the  field  identifications  used  by  the  SIMSCRIPT 
program  to  read  the  inputs. 

Figure  B*1  shows  an  overview  of  how  the  various  model  menus  are 
interconnected.  The  first  menu  that  will  come  up  upon  ruzming  the  program  is  the 
master  menu  depicted  in  Figure  B-2.  From  the  master  menu  all  other  program  menus 
can  be  accessed.  Upon  completion  of  input  modifications,  the  user  will  return  to  the 
master  menu  and  activate  the  start  button. 
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MODEL  INTERFACE  MENUS 
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Figure  B>2  MASTER  MENU  FORM 
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Figure  B-3  TASKFORCE  FORM 
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Figure  B-4  VEHICUB  DIMENSION  FORM 
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Figure  B-5  FULL  PLOW  SPECIFICATIONS 
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Figure  B-6  TRACK  PLOW  SPECIFICATIONS 
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APPENDIX  C  -  SOURCE  CODE  USTINGS 
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SOURCE  CODE  USTINGS 
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PREAMBLE 

normally  mode  Is  real 


EVENT  NOTICES  Include  GRAPBIC . UPDATE ,  STOP. SIM 
every  START  has  ,>n  ID 

every  MINE . ENCOUNTER  hes  an  ID.  a  MINE. ID 
every  NEW. CP  haa  an  ID 
every  OBSTACLE . ENCOUNTER  has  an  ID 
every  DIRECT. FIRE  has  an  ID 

TEMPORART  ENTITIES 

every  ELEMENT  has  a  ELEMENT. X.  an  ELQSNT.y, 
a  STATUS,  an  ELEMENT . TYPE ,  a  SPEED,  a  WIDTH, 
a  LENGTH,  a  TRACK. WIDTH,  an  ELEM.RADIUS.  a  PLOM.EFFECT, 
a  PLOW. WIDTH,  a  P. STATUS  and  an  ELEMENT. HIM 

define  ELEMENT. X  and  ELEMENT. Y  as  real  varlablas  "elasMnt  location 
define  SPEED  as  a  real  variable 

"status  Is  0  If  Inactive,  1  If  nornial  movaiaant 
"2  If  bypaaalnc 
define  STATUS  as  an  Integer  variable 

"type  Is  1  If  full  plow,  2  If  track  plow,  3,4,3 
"If  sosM  other  type  tracked  vehicle 
define  ELEMENT. TYPE  as  an  Integer  variable 

"radius  of  elaeient  defined  as  the  radius 
"of  the  eltela  with  same  area  as  vehicle 
define  ELEM.RADIUS  as  a  real  variable 
define  WIDTH,  and  LENGTH  as  real  variables 
define  TRACK. WIDTH  as  a  reel  variable 
define  ELEMENT. NUH  as  an  integer  variable 

"plow  effectiveness,  plow  width  and  plow  status 
"has  no  effect  unless  vehicle  is  of  typo  1 
"or  type  2 

define  PLOW. EFFECT  and  PLOW.HIDIH  as  real  variables 
define  P. STATUS  as  an  Integer  variable 


every  OBSTACLE  has  an  OBSTACLE. X.  an  OBSTACLE. Y, 
a  PTl.X,  a  PTl.Y,  a  PT2.X,  a  Pia.Y.  a  PT3.X,  a  PT3.Y. 
a  PT4.X,  a  FI4.Y,  a  PI3.X,  a  PI5.Y,  a  PT6.X,  a  PT6.Y, 
a  SLOPE. A.  a  SLOPE. F.  a  SLOPE. C.  a  SLOPE. D, 
a  Y.IHT.A,  a  Y.INT.F,  a  Y.INT.C,  a  Y.INT.D, 
and  an  088. RADIUS 


define 

define 

define 

define 

define 

define 

define 

define 

define 

define 

define 

define 


OBSTACU.X  and  OBSTACLE. Y  as  real  varlablas 


<»S. RADIUS  as  a  real  variable 
PTl.X  and  PTl.Y  as  real  variables 
PT2.X  and  PT2.T  as  real  variolas 
PT3.X  and  PT3.T  as  real  variables 
FT4.X  and  PI4.Y  as  real  variables 
PTS.X  and  PTS.Y  as  real  variables 
PT6.X  and  PTS.Y  as  real  variables 
SLOPE. A  and  SLOPE. F  as  real  varlablas 
SLOPE. C  and  SLOPE. 0  as  real  varlablas 
Y.IHT.A  and  Y.INT.F  as  real  varlablas 
Y.INT.C  and  T.INT.O  as  real  variables 


obstacle  canter 
"obstacle  radius 
"hex  point  1  coordlnstas 
' '  hex  point  2  coordinatas 
"hex  point  3  coordinates 
"hex  point  4  coordinates 
"hex  point  3  coordinatas 
"hex  point  6  coordinates 
"slopes  for  hex  sides  A  A  F 
"slopes  fox  hex  sides  C  &  D 
"y  intercepts  sides  A  A  F 
"y  intercepts  sides  CAD 
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63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 
76 

79 

80 
81 
82 

83 

84 
83 
86 

87 

88 

89 

90 

91 

92 

93 

94 
93 

96 

97 

98 

99 
100 
101 
102 

103 

104 
103 
106 

107 

108 

109 

110 
111 
112 

113 

114 
113 
118 

117 

118 

119 

120 
121 
122 

123 

124 


•vary  MINE  ha*  a  MINE.X,  a  MIRE.y,  a  MIHE.Z,  a  MINE. STATUS,  a  RADIUS, 
a  MIME. TYPE,  a  MINE. MUM  and  balonsa  to  tha  MINEFIELD 

datlna  MINE.X.  MINE.Y,  and  MIHE.Z  as  raal  variables 
define  RADIUS  as  a  real  variable 
define  MINE. HUM  as  an  Integer  variable 
define  MINE. STATUS  as  an  integer  variable 
define  MINE. TYPE  ea  an  integer  variable 

define  MINEFIELD  as  a  set  ranked  by  low  MINE.Y 
The  aye tea  owns  the  MINEFIELD 

•very  RED . OVERWATCH  has  a  R.O.HUM,  a  R.O.TYPE,  a  R.O.RATE,  a  R.O.BETA, 
a  R.O. STATUS,  a  R.O.X,  and  a  R.O.Y 

define  R.O.HUM  as  an  Integer  variable  "id 

define  R.O.TYPE  as  an  Integer  variable  "type 

define  R.O.RATE  as  a  real  variable  "fire  rate 

define  R.O.BETA  as  a  real  variable  "naan  acquisition  rate 

define  R.O. STATUS  as  an  Integer  variable  "status 

define  R.O.X  and  R.O.Y  as  real  variables  "location  for  display 

dynamic  graphic  entitles  Include  ELEMENT.  MINE.  OBSTACLE,  RED . OVERMATCH 

■  arrays  '  . . . 

"  aoveoMnt  maps  of  elsoents 
define  MOVEMENT . PLAN  as  a  3-dlmeQalonal  array 
define  BYPASS. MAP  as  a  3-disMnalonal  array 

' ' pk  and  fire  allocation  tables 
define  MINE.PK  as  a  2-dlmenaloDal  real  array 
define  R.O.PK  as  a  2*dlaenalanal  real  array 
define  FIRE. ALLOCATION  as  a  2*dlaeneional  array 

"pointer  arrays  to  access  elsoents,  obstacles, 

"red  overwateb  and  adne  objects, 
define  E,  OB,  RO  and  M  as  1-dlmensional,  pointer  arrays 

' ' array  of  navigation  checkpoint  y  values 
define  CP  as  a  l-dioenslonal  real  array 

' ' these  two  arrays  are  used  to  keep  track  of 
' ' the  typo  and  ownarshlp  of  ancounter  events 
' '  that  are  on  the  avant  calandar  —  used  when 
"it  becomes  necessary  to  clear  the  calendar, 
define  EVENT. LIST  as  a  l-dlmensional  integer  array 
define  SCB. EVENTS  as  a  l-dlmansional  pointer  array 

dafine  TItC.W. DEATH  as  a  l-diSMnslonal  double  array 
define  TDC.OF.OCMPLETION  as  a  l-dl»snsionel  doubla  array 

global  output  variables 

dafine  LINEAR . DENSITY  as  a  real  variable 
dafine  LINEAR. DENSITY. TYPE. 1  as  a  real  variable 
define  LINEAR. DENSITY. TYPE. 2  as  a  real  variable 
define  LINEAR. DENSITY. TYPE. 3  as  •  real  variable 
dafine  LINEAR.0XHSITY.TYPB.4  as  •  reel  variable 
define  LINEAR . DENSITY . TYPE . 3  as  •  reel  variable 

define  AREA. DENSITY  as  a  real  variable 
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125  d«£ln«  AREA. DENSITY. TYPE. 1  ■  real  variable 

126  define  AREA . DENSITY . TYPE . 2  aa  a  real  variable 

127  define  AREA. DENSITY. TYPE. 3  aa  a  real  variable 

128  define  AREA . DENSITY . TYPE . *  aa  a  real  variable 

129  define  AREA. DENSITY. TYPE. 5  aa  a  real  variabla 

130 

131  define  MINE. KILLS  -a  a  real  variable 

132  define  MINE. KILL. 1  aa  a  real  variable 

133  define  MINE.KIU.2  aa  a  real  variable 

13*  define  MINE. KILL. 3  a*  a  real  variable 

135  define  MINE. KILL.*  aa  a  real  variable 

138  define  MINE. KILL. 5  aa  a  real  variable 

137 

138  define  MIKE. MOVED  aa  a  real  variabla 

139 

1*0  define  R.O.SBOTS  aa  a  real  variable 
1*1  define  R.O.KILL  a*  a  real  variable 
1*2 

1*3  define  LOST. TO. MINES. BYPASSING  aa  a  reel  variabla 
1**  define  LOST . TO . FIRES . BYPASSING  aa  a  real  variable 
1*5 

1*6  define  TOTAL. LOST  aa  a  real  variable 
1*7  define  LOSS. RATE  a*  a  real  variabla 
1*8 

1*9  atatiatical  outputa  — " 

150 

151  tally  MEAN. MINE. KILLS  as  the  aaan.  and  VAR. MINE. KILLS 

152  aa  the  variance  of  MINE. KILLS 

153  tally  MEAN. MINE. KILL. 1  as  the  aean,  and  VAR. MINE. KILL. 1 
13*  as  the  variance  of  MINE. KILL. 1 

135  tally  MEAN. MINE. KILL. 2  as  the  aean,  and  VAR.MINE.KILL.2 

136  as  the  variancs  of  MIRE.KIU.2 

157  tally  MEAN. MINE. KIU. 3  aa  tha  Man.  and  VAR. MINE. KILL. 3 

138  aa  tha  variance  of  MINE. KILL. 3 

139  tally  MEAN. MINE. KIU.*  as  the  aean,  and  VAR. MINE. KIU. * 

180  as  the  variance  of  MINE. KIU.* 

161  tally  MEAN. MINE. KIU. 3  as  tha  aaan.  and  VAR. MINE. KIU. 5 

162  aa  the  variancs  of  MINE. KIU. 3 
183 

16*  tally  MEAN. MINE. MOVED  aa  tha  aaan  and  VAR  MINE. MOVED 

163  as  the  variancs  of  MINE. MOVED 
166 

167  tally  MUN. R.O.SBOTS  aa  the  aaan  and  VAR. R.O.SBOTS  aa  the 

168  variancs  of  R.O.SBOTS 

189  tally  (CAN.R.O.KIU  as  the  aean  and  VAR.R.O.KIU  as  the 

170  variance  of  R.O.KIU 

171 

172 

173  tally  MEAN. LOST. TO. MINES. BYPASSING  as  the  aaan  and 

17*  VAR.L08T.T0.MINBS. BYPASSING  a*  tbs  variancs  of 

173  LOST.  TO.  NnSS.  BYPASSING 

176 

177  tally  MAH. LOST. TO. riRES. BYPASSING  as  tha  aean  and 

178  VAR. LOST. TO. PIRB8. BYPASSING  as  the  variancs  of 

179  LOBT. TO. FIRES. BYPASSING 

180 

181  tally  (CAN. LOSS. RATE  as  the  aaan  nd  VaR. LOSS. RATE  as  tha 

182  varianea  of  LOSS. RATE 

183 

18*  ''"'■»  I II  . . . .  ■'  "'Alobal  input  variables 

183 

186  dsflns  NDWER.OF.RUNS  ss  an  Intasar  variable 
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187 

188  dcfin*  E. SPEED. 1.  E. SPEED. 2.  E. SPEED. 3,  E. SPEED. 4.  E. SPEED. 3 

189  as  raal  varlablas 

190  daflna  E. WIDTH. 1,  E. WIDTH. 2.  E. WIDTH. 3,  E. WIDTH. 4,  E. WIDTH. 3 

191  as  raal  varlablas 

192  daflna  E. LENGTH. 1,  E. LENGTH. 2,  E. LENGTH. 3.  E. LENGTH. 4.  E. LENGTH. 3 

193  as  raal  varlablas 

194  daflna  E. TRACK. WIDTH. 1,  E. TRACK. WIDTH. 2.  E . TRACK . WIDTP . 3 . 

193  E.TItACK.WIDTB.4,  E. TRACK. WIDTH. 3  as  raal  varlablas 

<  196  daflna  NAV.EKR.l,  HAV.ERR.2.  NAV.ERR.3.  NAV.ERR.4.  HAV.ERR.3  as 

197  raal  varlablas 

198 

199  daflna  E. SPEED  as  a  raal  varlabla 

*  200 

201  daflna  MINEFIELD . DEPTH  aa  a  raal  varlabla 

202  daflna  HUM. ELEMENT,  HUM. MINE  and  HUM. OBSTACLE  as  Intasar  varlablas 

203  daflna  HUM. RED. OVERMATCH  aa  an  Intasar  varlabla 

204 

203  "aamunts  of  dlffarant  nlnas 

206  daflna  P. MINES,  I. MINES,  C. MINES,  T.HINES. 

207  and  M. MINES  at  Intagar  varlablas 

208 

209  "slxas  of  dlffarant  nlnat 

210  daflna  P. RADIUS,  I. RADIUS,  C. RADIOS,  T. RADIUS. 

211  and  W. RADIUS  aa  raal  varlablas 

212 

213  "aaounts  of  dlffarant  vahlclas 

214  daflna  TRACKl,  TRACK2,  TRACK3,  F. PLOWS,  and  T. PLOWS  aa  Intagar  varlablas 
213 

216  "  charactarlstlcs  of  dlffarant  plows 

217  daflna  PLOW. EFFECT.  1  at  a  raal  varlabla  "fw  plow  affaetlvanass 

218  daflna  FLOW. EFFECT. 2  as  a  raal  varlabla  "tw  plow  affaetlvanass 

219  daflna  EFF. WIDTH  aa  a  raal  varlabla  "tw  plow  aftactlva  width 

220  daflna  PLOW. WIDTH.  1  at  a  raal  varlabla  "fw  plow  width 

221  daflna  FLOW. WIDTH. 2  aa  a  raal  varlabla  "tw  plow  width 

222  daflna  PLOW. INTERVAL  as  a  raal  varlabla  "Interval  batwaan  plows  and 

223  "otbar  taskforca  alaownts 

224 

223  daflna  R.O.RATE.l  aa  a  raal  varlabla 

226  daflna  R.O.BETA.l  as  a  raal  variable 

227 

226  define  HUM. CP  aa  an  Integer  variable 

229  daflna  INTERVAL  aa  a  raal  varlabla 

230  define  CF. INTERVAL  as  a  seal  variable 

231 

232  daflna  GRAPH. OH  as  an  Intagar  variable 

233 

234  "tlsM  variables 
233  daflna  adnuta  to  aaan  units 

236  daflna  alnutaa  to  aaan  units 

237  daflna  OLD. TIM  as  a  double  variable 

238 

239  st^tltuts  thssa  3  llnaa  for  .  .MOUSE. PAUSE  "to  hold  graphics  on  scraan 

240 

-•  241  call  raadloc.r  given  0,0,0 

242  Tlsldlng  DOMir.X.  DUMT.Y,  DUMff.V 

243  let  OQIWX.X  •  DUMT.X 

244  1st  Dumr.r  •  ouHtr.Y 

*  245  let  OUPtir.V  -  DUMff.V 

246 

247  and  "PREAtSLX 
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1  MAIM 

2 

3  d*fin*  I  as  an  intasax  variabla 

5  call  DEFAULT. values 

8  call  GET. DATA 

7  call  SET. DISPLAY 
S 

9  ' '  turn  sraphiea  off  for  aailtlpla  runa 

10  If  HUMBER. OF. RUNS  >  1 

11  aiAPH.OH  -  0 

12  andif 

13 

la  for  I  -  1  to  HUMBER. OF. RUNS 

15  do 

16  "this  structuxa  allows  tha  ussr  to  dlsplar  a  particular 

17  "run  in  a  aailtlpla  run  aloailatlon.  Thla  might  ba  dona  If 

18  ' '  tha  outputs  appaaxad  unusual  ox  for  random  sampling  of 

19  "tha  modal  runs.  Currantly  hardeodsd  for  Itaratlon  167, 

20  ' '  this  can  ba  tumad  Into  a  global  valua  and  than  sat  during 

21  "tha  awdal  Initialisation. 

22  if  I  -  167 

23  traea 

24  GRAPH. OH  -  1 

23  andlt 

26 

27  call  IHITIALIZE 

28 

29  LOSS. RATE  •  TOTAL. LOST  /  RUH.ELEMEHT 

30 

31  ' '  raeoxd  daslrad  Itaratloo  outputs 

32  call  DATA. BIT  giving  I 

33 

34  loop 
33 

36  "taeerd  modal  run  outputs 

37  "call  MIHE. DUMP 

38  "call  DATA. DUMP 

39  ' ' call  OUTPUT 

40  call  SUNMRT 

41 

42  atop 

43 

44  and  "MAIN 
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1  routin*  BYPASS  slvan  ID.  OBS.ID,  SIDE,  X,  Y 

2 

3  "BYPASS. MAP  PLOTS  A  4  POINT  BYPASS  ROUTE  TO  AVOID  OBSTRUCTION  IN  MOVEMENT 

4  "PATH.  POINT  1  IS  THE  EXIT  FROM  THE  MOVEMENT  PATH.  POINT  2  IS  THE  FIRST 

5  "PIVOT,  POINT  3  IS  THE  SECOND  PIVOT,  AND  POINT  4  IS  THE  REENTRY  POINT  TO 

6  "THE  MOVEMENT  PATH. 

7 

S  dsfln*  ID  ai  an  Intagar  varlabla 
9  dafina  OBS.ID  as  an  intagar  varlabla 

10  dafina  SIDE  as  an  intagar  varlabla 

11  dafina  X  and  Y  as  raal  variablas 

12  dafina  COUNT  as  an  intagar  varlabla  "  cp  intarval  baing  axaminad 

13  dafina  SLOPE  at  a  raal  varlabla 

14  dafina  SLOPE. 2  at  s  raal  varlabla 

15  dafina  Y.INT  aa  a  raal  varlabla 

16  dafina  Y.INT. 2  aa  a  raal  varlabla 

17  dafina  INTERCEPT. X  at  a  raal  varlabla 

18  dafina  INTERCEPT. Y  aa  a  raal  varlabla 

19  dafina  PIVOT2  at  a  raal  varlabla 

20  dafina  START. CP  at  a  raal  varlabla 

21 

22  If  SIDE  -  0 

23  print  2  llnat  with  SIDE  thua 

fron  BYPASS  —  SIDE  •  *•*  — >  arror  condition 
changing  SIDE  to  1  to  allow  program  continuation 

26  SIDE  •  1 

27  andlf 

28 

29  ' ' point  1 

30  BYPASS. MAP( ID,  1,1)  •  X  "x  valua  ccmputad  during  dittanca . to . obt 

31  BYPASS. MAP(ID, 1,2)  •  Y  "y  valua  computad  during  dlatanca . to . obt 

32 

33  ' ' point  4  -  uta  point  4  of  hax  aa  tamporary  axit 

34  ' '  tbit  valua  will  ba  ovarwrittan  lattar  In  this  routlna 

33  BYPASS. HAP( ID, 4,1)  •  PT4.X(OB(Oas.ID)) 

36  BYPASS.MAP(ID,4,2)  •  PT4 . Y(OB(OBS. ID)) 

37 

38  If  (SIDE  •  1) 

39 

40  ' ' past  rigbt 

41 

42  ' '  point  1  -  axlt  point 

43  BYPASS. NAP(  10, 1,3)  -  SLOPE. A(OB(OBS. ID)) 

44  BYPASS.  MAPI  ID,  1,4)  •  Y.INT.A(ra(OBS.ID)) 

43 

46  "point  2  -  pivot  1 

47  BYPASS. MAPdD, 2,1)  •  PT2.X((»<OBS.ID))  "x  of  bypass  pivotl 

48  BYPASS.MAP(ID,2,2)  •  PT2.Y(OB(OBS.ID))  "y  of  bypass  pivotl 

48  BYPASS. MAPdD, 2, 3)  -  1000000.0  " approximata  inflnlta  slopa 

30  "y  Intarcapt 

31  BTPASS.HAPdD,2,4}  •  BYPASS. HAPCID, 2,2)  - 

32  (BYPASS.MAPdD.2.1)  *  BYPASS. MAPdD,2, 3) ) 

33 

34  "point  3  *  pivot  2 

33  BYPASS. MAPdD, 3,1)  -  PT3.X(OB(OB8.ID)) 

36  BYPASS.NAPdO,3,2)  •  PT3.Y((»(OBS.ID)) 

37  BYPASS.MAPdD,3,3)  •  (BYPASS.MAPdD,3,2)  -  BYPASS. MAPdD, 4 ,2) )  / 

38  (BYPASS.MAPdD,4,l)  -  BYPASS. MAPdD, 3,1)) 

39  BYPASS.MAPdO,3,4)  •  BYPASS. MAPdD, 3, 2)  - 

60  (BYPASS. MAPdD, 3,1)  •  BYPASS. MAPdD, 3, 3)) 

61  andlf 

62 
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63  if  (SIDE  -  2) 

64  * ' past  Isft 

65 

66  ' ' point  1 

67  BYPASS. MAP(  10, 1,3)  •  SLOPE. F(OB(OBS.  ID)  ) 

68  BYPASS. MAP( ID, 1.4)  >  Y . INT .F(OB(OBS. ID) ) 

69 

70  "point  2 

71  BYPASS. MAPdD, 2,1)  -  PT6.X(OB(OBS.ID))  "z  of  bypass  cp  2 

72  BYPASS.MAP(ID,2,2)  •  PT6.Y(OB(OBS.ID))  "y  of  bypass  cp  2 

73  BYPASS. MAPdD, 2, 3)  -  1000000.0  "  apptozioata  infinita  slops 

74  "y  intaceapt 

75  BYPASS.MAPdD,2,4)  -  BYPASS.  MAP  (ID,  2. 2)  - 

76  (BYPASS. MAPdD, 2,1)  *  BYPASS. MAP(ID,2, 3) ) 

77 

78  "point  3 

79  BYPASS. MAPdD, 3,1)  •  PTS.X(OB(OBS.IO)) 

SO  BYPASS. MAPdD, 3. 2)  -  PTS. Y(OB(OBS. ID) ) 

81  BYPASS.MAP(ID.3,3)  •  (BYPASS. MAPdD, 4, 2)  -  BYPASS. MAPdD, 3. 2))  / 

52  (BYPASS. MAPdD, 3,1)  -  BYPASS. MAPdD, 4 , 1) ) 

53  BYPASS. MAPdD, 3, 4)  -  BYPASS. MAPdD, 3. 2)  - 

84  (BYPASS. MAPdD, 3,1)  *  BYPASS. MAPdD, 3, 3)) 

85  andif 

86 

87 

88 

89  "CALCULATING  tha  MOVEMENT . PLAN  raantry  Point. 

90  ' '  SIDE  “  1  indieataa  paaalng  laft 

91  "  SIDE  •  2  indieataa  patsinc  right 

92  ' '  (oaL  it  to  ealeulata  tha  Intartaction  point  of  tha  final  bypatt 

93  "  lag  with  tha  appzoprlata  aovaaant  plan  aquation  *  tha  tziclc  it  to 

94  datazmina  tha  appzoprlata  oovaatant  plan  aquation  -  tha  Intartaction 

95  '  point  Butt  taka  plaea  within  tha  approprlata  Intazval  for  that  movmant 

96  "  aquation  (datarmlnad  by  eoiiparlng  tha  y  valua  of  tha  intareapt  with  tha 

97  "  uppar  boundary  of  tha  Intarval. 

98 

99 

100  PIV0T2  ••  BYPASS. MAPdD, 3, 2)  "y  coordlnata  of  2nd  pivot 

101  "OB. END. Y  •  PT4.Y(0B(0BS.ID)) 

102  START. CP  -  0 

103  ' ' tanlty  cback 

104  If  PIVDT2  >  CP(NIIN.CP) 

105  print  1  Una  thut 

plvDt2  aztanda  bayond  boundary  of  problaa 

107  ' '  thould  tazBlnata  at  Intartaction  of  2nd  bypatt  lag  and  boundary 

108  andif 

109 

110  "find  Intarval  which  eontaina  pivot  2 

111  tor  I  -  1  to  NUM.CP 

112  do 

113  if  CPd)  <  PIVDT2 

lit  START. CP  -  I 

113  andif 

116  loop 

117 
116 

119  "not  cuzrantly  in  final  Intarval 

120  if  ((START. CP  *  1)  na  NUM.CP) 

121 

122  for  COUNT  -  START. CP  to  HUM. CP-1 

123  do 

124 
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125  SLOPE  >  MOVEMENT.  PLAN  (ID,  COUNT,  3)  "ml  for  movaoont  path  sawnant 

126  y.INT  -  MOVEMENT.  PLAN  (ID,  COUNT.  "bl  intarcapt  for  sama  sasnant 

127 

128  If  (SIDE  -  1) 

129  SLOPE. 2  •  SLOPE. D(OB(OBS. ID))  "ra2  for  bypaaa  sagmant  laft 

130  Y.INT. 2  -  Y.INI.D(OB(OBS.ID)) 

131  INTERCEPT. X  -  (Y.INT. 2  -  Y.INT)  /  (SLOPE  -  SLOPE. 2) 

132  INTERCEPT. Y  -  SLOPE  *  INTERCEPT. X  ♦  Y.INT 

133 
13* 

13 5  andif 

136 

137  if  (SIDE  •  2) 

138  SLOPE. 2  -  SLOPE. C(OB(OBS. ID))  "o2  for  bypaaa  aagmant  right 

139  y.INT. 2  -  y.INT.C(OB(OBS.ID))  "b2  for  bypaaa  aagiaant  right 

1*0  INTERCEPT. X  -  (Y.INT. 2  -  Y.INT)  /  (SLOPE  -  SLOPE. 2) 

1*1  INTERCEPT. Y  -  SLOPE  •  INTERCEPT. X  +  Y.INT 

1*2 

1*3  andif 

1** 

IAS  "condition  for  forward  aiovaamnt 

1*6  If  (INTERCEPT. y  >  ByPASS.MAP(ID.3,2)) 

IA7  "  Intaraactlon  occura  within  tha 

lA*  "boundary  of  tha  Intarval  baing 

IA9  ' ' aranlnad 

150  IfdHTERCEPT.Y  <  MOVEMENT.  PLAN  (ID,  COOHT+1,  2)) 

151  BYPASS. MAP( ID, *,1)  -  IHTEHCEPT.X 

152  ByPASS.MAP(ID.*,2)  -  INTERCEPT. Y 

153  Laava 

IS*  andif 

155  andif 

156 

157  loop 

158 

ISO  alia  ' '  raantar  at  aslt  boundary 
160 

161  BYPASS. MAPdO,*, 2)  -  CPINUM.CP) 

162  BYPASS. NAPdO,*,l)  •  (BYPASS. HAPCID,*, 2)  •  BYPASS. HAPdD, 3,*))  / 

IS3  BYPASS.MAPdD.3,3> 

16*  andif 

165 

166  ' DONE' 

167 

168  ratum 

169 

170  and  "BYPASS  aditad  31  ADO  91 


91 


CACI  FC  SIMSCRIPT  II. S  (R)  v2.3  PAGE  9 

OPTIOHS  /NEW/IIOWAEH/LIHES-65  09/14/1991  20:27:16 


1  routin*  CALENDAR. UPDATE 

2 

3  ' '  THIS  ROUTINE  IS  CALLED  ANYTIME  AN  ELEMENT  IS  CONVERTED  INTO  AN  OBSTACLE .  ITS 

4  ' '  PURPOSE  IS  TO  PREVENT  A  '  TIME-WARP'  ,  WHERE  AN  ALREADY  SCHEDULED  EVENT 

5  "IS  CARRIED  OUT  EVEN  THOUGH  THE  SITUATION  HAS  CHANGED  AND  THE  DATA  UPON 

6  "WHICH  THAT  EVENT  WAS  ORIGINALLY  SCHEDULED  HAS  CHANGED.  THE  ROUTINE  CANCELS 

7  "all  ENCOUNTER  EVENTS,  AND  THEN  RESCHEDULES  EACH  ACTIVE  ELEMENT  BASED  UPON 
a  "THE  DATA  EXISTANT  WHEN  THIS  ROUTINE  WAS  CALLED 

9 

10  dafln*  I  an  intagar  variabla 

11 

12  for  I  -  1  to  NUM. ELEMENT 

13  do 

14 

15  salaet  caaa  EVENT. LIST(I) 

16 

17  caaa  1 

18 

19  eaneal  tha  HEW. CP  eallad  SCH.EVENTS(I) 

20  EVENT. LISTd)  -  0 

21 

22  caaa  2 

23 

24  eaneal  tha  MINE. ENCOUNTER  eallad  SCH.EVENTS(I) 

25  EVENT. LIST(I)  -  0 

26 

27  eaaa  3 

28 

29  eaneal  tha  OBSTACLE . ENCWNTER  eallad  SCH.EVENTS(I) 

30  EVENT. LISI(I)  -  0 

31 

32  eaaa  0 

33 

34  andaalaet 

35 

36  loop 

37 

38  for  I  ■  1  to  RUM. ELEMENT 

39  do 

40  If  ((STATUS(E(I))  na  0)  and  (SFEED(E(I))  na  0)) 

41 

42  call  NEXT. ENCOUNTER  giving  I 

43 

44  andit 

45  loop 

46 

47  ratum 

48 

49  and  "CALENDAR  UPDATE  adltad  28  July  91 
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1  routin*  DATA. BIT  given  I 

2 

3  ' '  THIS  ROUTINE  USED  TO  RECORD  INFORMATION  DESIRED  FROM  EACH  ITERATION 

4 

5  define  I  as  an  Integer  veriable 

6 

7  print  1  line  with  I.  MINE. KILLS,  R.O.KILL,  TOTAL. LOST.  LOST. TO. MINES. BVPASSING, 

8  TIME.OF.DEATH(l),  IIME.0F.DEATH(2),  TIME  .OF  .DEATH(3)  ,  TIME  .OF  .DEATH(4)  , 

9  TIME.OF.DEATH(5).  TIME.OF . DEATH(6)  ,  TIME.OF.COMPLETION(l) , 

10  max.fCTIME.OF.COMPLETIONd),  TIME.OF  .COMPLETION(2) ,  TIME .  OF .  COMPLETION  ( 3 ) . 

11  TIME.OF.COMPLETION(4).  TIME.0F.CQMPLET10N(5),  TIME.OF.COMPLETION(6) )  thus 


13 

14  return 

15  end  "DATA. BIT 
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1  routine  DATA. DUMP 

2 

3  ' '  THIS  ROUTINE  CAUSES  THE  GENERATED  MOVEMENT  PUN  ARRATS  TO  BE  RECORDED 

4  "AND  SUtfURIZES  THE  VEHICLE  STATUS  AND  OBSTACLE  STATUS  AND  THE  END  OF 

5  "AH  ITERATION  —  SHOULD  NOT  BE  USED  FOR  MULTIPLE  ITERATIONS 

6 

7  define  I  aa  an  intecar  variable 

8  define  CONDITION  es  a  text  variable 

9 

10  print  3  linea  thus 

DUMP  OF  VEHICLE  REUTEO  DATA 
14 

13  print  3  lines  with  tlms.v  thus 
ELPMEHT  STATUS  AT 
TIME  "  •••*.••* 

ID  X  y  SPEED  STATUS  TYPE 


21 

22  for  I  •  1  to  HUM. ELEMENT 

23  do 

24  print  1  line  with  ELEMENT. HUM(E(I)).  ELEMENT. X(E(I) > ,  ELEMENT. y(E(I) ) , 

23  SPEEO(E(I)).  STATUSlEd)),  and  ELEMENT.TYPE(E(I))  thus 

*•  *•*•••  ******  ******  **  ** 

27  loop 
26 

29  print  4  lines  thus 

OBSTACLE  STATUS 

HUM  X  y  RADIUS 

34 

33  fox  3  -  1  to  HUM. OBSTACLE 

36  do 

37  print  1  line  with  J,  OBSTACLE. X(OB(J>),  OBSTACLE. TCOBCJ)), 

38  OBS.RADIUS(OB(J))  thus 

**  *** . ***  *** . ***  *** . *e 

40  loop 

41 

42  print  3  llnaa  thus 
BYPASS. MAP 

ELE  E-X  E-Y  ST  Pl-X  Pl-Y  ST  P2-X  P2-Y  ST  Ent-X  Ent.Y  ST 

46  fox  J  •  1  to  HUM. ELEMENT 

47  do 

48  print  1  line  with  J,BYPASS.MAP(J,1.1).  BYPASS. MAP(J. 1.2) .  BYPASS.HAP(J.1,3). 

49  BYPASS.MAP(J,2,1),  BYPASS.HAP(J,2.2) .  BYPASS.MAPC J,2. 3) , 

30  BYPASS.MAP(J.3,1),  BYPASS.MAP(J,3,2).  BYPASS.MAPC J. 3 . 3) , 

31  BYPA8S.MAP(J.4,1),  BTPASS.MAP(J,4.2),  BTPASS.MAP(J,4,3)  thus 

*•  •*,**  ee.ee  ••  **.**  **,**  **  **  **  **.**  **  **.**  **.**  ** 

33  loop 

34 

33  tor  J  -  1  to  HUM.ELEEENT 

36  do 

37  print  1  line  with  J,  ELEMOrt.TYPECElJ))  thus 
ELEECNT  #  ••  has  tYpa  •• 

39 

60  print  2  linos  thus 

X-CCRR  y-CCRR  SLOPE  INTERCEPT 
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63 

64  for  I  -  1  to  mm. CP 

65  do 

66  print  1  Una  with  MOVEMENT . FLAH(J, I , 1) ,  MOVEMENT. PLANCJ, I . 2} . 

67  MOVEMENT. PLAN <J.  1. 3).  M0VIMENT.PLAN( J, 1 , 4 )  thua 


69  start  naw  output  lina 

70  loop 

71  loop 

72 

73  print  4  Linas  thus 
ELEMENT  STATUS 

NUM  STATUS  X  Y 


78 

79  for  J  >  1  to  NUM. ELEMENT 

80  do 

81  if  STATUS(E(J))  -  0 

82  CONDITION  -  'DEAD  ' 

83  slaa 

84  CONDITION  -  "ALIVE' 

85  andif 

86  print  1  lina  with  J.  CONDITION,  ELEMENT. X(E(J) ) ,  ELEMENT.y(E( J) )  thus 

**  *****  ******  ****** 

88  loop 

89 

90  print  4  linas  thus 
OBSTACLE  LOCATIONS 

NUM  X  Y 


95 

96  for  J  •  1  to  NUM.OSSTACLE 

97  do 

96  if  OBSTACLE. Y(0B(J))  >  0 

99  print  1  Lins  with  J.  OBSTACLX.X(OB(J)>,  OBSTACU.Y(OB(J))  thua 

**  *«*  _ •***  *** , *•*• 

101  andif 

102  loop 

103 

104  rstum 

103  and  "DATA. DUMP 
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1  routine  DEFAULT. VALUES 

2 

3  "THIS  ROUTINE  SETS  DEFAULT  VALUES  FOR  ALL  INPUT  VARIABLES. 

4 

5  rotorvo  MIHE.PK(*.*)  «■  S  by  S 

6 

7  ' '  default  valuae  for  TASKFORCE  manu 

8  " . - . - 

9  F. PLOWS  -  1 

10  T. PLOWS  -  0 

11  TRACKl  •  S 

12  TRACER  -  0 

13  TRACKS  •  0 

14 

15 

16  "default  valuaa  for  Type  1  vehicle  aanu  (fw  plow) 

17  " . 

18  E.WIOTB.l  -  3.48 

19  E.LEHOTH.l  •  9.03 

20  E. TRACK. WIDTH. 1  -  .633 

21  NAV.ERR.l  -  1.0 

22 

23 

24  "Default  valuaa  for  full  width  plow  apaeifieation  input  fora 

23  " . .  ■■  I .  ■■■■■■.  ■■■ 

28  PLOW.EFPECT.l  •  1.0 

27  FLOW. WIDTH.  1  -  4.3 

28  E. SPEED. 1  -  6.0 

29 

30 

31 

32  ' ' daf ault  valuaa  for  Type  2  vahiela  aanu 

33  " . . 

34  E. WIDTH. 2  -  3.48 

33  E.LBIIOTH.2  •  9.03 

38  E. TRACK. WIDTH. 2  •  .833 

37  HAV.ERR.2  w  1.0 

38 

39  '  *  Default  valuaa  for  track  width  plow  apaeifieation  input  fora 

ao  "  '  . .  ill— . .  I.-  I  ■■■ 

41  PLOW. EFFECT. 2  •  1.0 

42  PLOW.WIDTH.S  -  1.0 

43  E. SPEED. 2  -  6.0 

44  EPF. WIDTH  •  4.0 

43 

46 

47  "default  valuaa  tor  Type  3  vahiela  aanu 


48  . . 

49  E. WIDTH. 3  -  3.48 

50  B.LEMTB.S  •  9.03 

31  K. TRACK. WIDTH. 3  •  .633 

32  HAT. ERR. 3  -  .3 

33 

34 


S3  "default  valuaa  fox  Type  4  vehicle 
^  • ................... _ ...... _ ..... 

37  E.WI0TH.4  •  3.48 

38  B.LBR8n.4  -  9.03 

38  E. TRACK. WIDTH. 4  -  .633 

60  HAT. ERR. 4  •  l.O 

61 
62 
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63  "default  values  for  Type  3  vehicle  menu 

6*  ' ' . 

63  E. WIDTH. 3  -  3.48 

66  E. LENGTH. 3  •  9.03 

67  E. TRACK. WIDTH.  3  -  .633 

68  NAV.ERR.3  -  1.0 

69 

70 

71  "default  valuae  for  Mine  Data  menu 

72  " . 

73 

7*  P. HINES  -  30 

73  I. HINES  -  30 

76  C. HINES  -  8 

77  T. HINES  -  0 

78  W. HINES  -  0 

79 

80 
81 

82  "Default  valusa  for  Bins  apsclflcatlon  Input  form 

S3  . ■■■  . 

8* 


83 

P. RADIUS  -  .1 

86 

I. RADIUS  •  .1 

87 

C. RADIUS  -  .1 

88 

T. RADIUS  >  0 

89 

W.  RADIUS  -  0 

90 

01 

HINE.PK(l.l) 

.03 

92 

HIRE.PK(1.2) 

.1 

93 

H1RE.FK(1.3) 

.9 

94 

HXNE.PKd,*) 

0 

93 

HINE.PK(1.3) 

0 

90 

97 

HIRS.PK(2,1) 

.03 

90 

HIRB.PK(2.2) 

.3 

99 

H1RE.FK(2.3) 

.9 

100 

HINE.PK(2,*) 

0 

101 

HINK.PK(2.S) 

0 

102 

103 

HIRE.PK(3,1) 

.3 

10* 

H1NS.FK(3.3) 

.7 

103 

HIRI.rK(3,3} 

.9 

100 

HINB.fK(3.*) 

0 

107 

H1RK.PK<3.3> 

0 

100 

109 

HIRB.PK(*,1) 

0 

110 

HlNl.fK(*.2) 

0 

111 

NINI.IK(*,3) 

0 

112 

Hm.K(*,*) 

0 

113 

lim.K(*.9) 

0 

11* 

113 

Mxn.ms.i) 

0 

lie 

Kni.K(S.3) 

0 

117 

Mni.PK(9,9) 

0 

119 

H«.fK(S,*) 

0 

110 

Mm.FKCS.S) 

0 

120 

121 

122 

123  "Default  values  for  red  overuuteh  fora 
la*  "  .  "■  ■■  .11... 
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125 

126  NUH.RED.OVERWaTCB  -  1 

127  R.O.RATE.l  -  .3 

128  R.O.BETA. 1  -  .7 

129 

130  return 

131 

132  «nd  "  DEFAULT . VALUES 
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1  routln*  DELTA. DISTANCE  glvan  ID . TRAVEL . TIME  ylaldln<  DISTANCE 

2 

3  "DETERMINES  HOW  FAR  THE  ID  TRAVELED  IN  THE  GIVEN  TIME 

4 

3  dafina  ID  aa  an  Intagar  varlabla 

6  dafina  TRAVEL. TIME  ai  a  doubla  varlabla 

7  dafina  DISTANCE  as  a  laai  varlabla 

8  dafina  VELOCITY  as  a  raal  varlabla 

9 

10  VELOCITY  •  SPEED(E(ID)) 

11  DISTANCE  -  TRAVEL. TIME  •  VELOCITY 

12 

13  ratum 

14 

13  and  "  DELTA. DISTANCE 
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1  Eoutin*  DELTA. TIME  slvan  ID  uid  DISTANCE  ylaldlns  DURATION 

2 

3  ' '  THIS  ROUTINE  DETERMINES  HOW  LONG  IT  WILL  TAKE  AN  ELEMENT  TO  COVER 

4  "A  GIVEN  DISTANCE.  THE  ROUTINE  ACCESSES  THE  ELEMENT  RECORD  TO 

5  ' '  DETERMINE  ELEMENT  SPEED  AND  RETURNS  TO  THE  CALLER  THE  TIME  IT  TAKES 

6  '  ‘  THAT  ELEMENT  TO  COVER  THAT  DISTANCE 

7 

8  dafln*  ID  an  Intagar  varlabla 

9  daflna  DISTANCE  aa  a  zaal  varlabla 

10  daflna  DURATION  aa  a  doubla  varlabla 

11 

12  DURATION  •  DISTANCE  /  SPEE0(E<I0)) 

13 

14  ratum 
13 

16  and  "DELTA. TIME 
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1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 
13 
16 

17 

18 

19 

20 
21 
22 

23 

24 
23 
26 

27 

28 

29 

30 

31 

32 

33 

34 
33 

36 

37 

38 

39 

40 

41 

42 

43 

44 
43 

46 

47 

48 

49 

30 

31 

32 
S3 
3* 

33 

36 

37 

38 

50 
80 
61 
62 


•vant  DIRECT. FIRE  glvan  ID 

' '  THIS  EVENT  RESOLVES  A  DIRECT  FIRE  ENGAGEMENT  BETWEEN  A  RED  OVERHATCH 
"ELEMENT  AND  A  LIVING  ELQIENT  IN  THE  MINEFIELD.  HOOKS  EXIST  FOR  ALSO 
"ALLOWING  DIRECT  FIRE  ENGAGEMENTS  AGAINST  ALREADY  DISABLED  VEHICLES, 
"BUT  THIS  OPTION  IS  NOT  YET  IMPLEMENTED. 


dafln*  ID  as  an  Intagar  varlabla  ' '  flrar  Id 

daflna  I  as  an  intagar  varlabla  ' '  counbsr 

dstlna  COUNT  aa  an  intagar  varlabla  ' '  ntaabsr  of  targata 

daflna  DEAD  COUNT  as  an  Intagar  varlabla  "numbar  of  daad  targata 

daflna  TGT.LIST  aa  a  l-dlmanalonal  Intagar  array 

daflna  DEAD . T6T . LIST  aa  a  I'dloanalonal  Intagar  array 

daflna  P.TGT  at  a  1-dloantlonal  raal  array  "prob  of  shooting  this  tgt 

daflna  TGT  at  an  Intagar  varlabla  ' ' targat  id 

daflna  PI,  P2,  P3  aa  a  raal  varlablaa 

daflna  PK  aa  a  raal  varlabla  "pk  of  killing  If  shot 

daflna  ROLL  aa  a  raal  varlabla  ' ' dies  roll 

daflna  CUM. PROB  as  a  raal  varlabla 

daflna  FIRST  aa  an  Intagar  varlabla  "polntsr  to  first  activa 

"  alaaant  In  minafiald 
daflna  X,  Y  aa  raal  varlablaa  "flrar  display  location 

daflna  XI,  Y1  at  raal  varlablaa 
daflna  Y.HIH,  Y.MAX  aa  raal  varlablaa 

daflna  FLAG  aa  an  Intagar  varlabla  ' ' any  novlng  vsbielaa  ? 


ratsrva  TGT.LIST(*)  as  HUM. ELEMENT 
rstarvs  DEAD . TGT . LIST (* )  aa  HUM. ELEMENT 
raaarva  P.TGT(*)  aa  HUM.ELIMEHT 


COUHT  -  0 
DEAD. COUNT  •  0 
PK  •  .2 

X  •  R.O.X(RO(ID)) 

Y  •  R.O.YCROdO)) 

R.O. SHOTS  ••  R.O.SBOTS  *  1.0 

"datarmlna  bow  aany  targata  arlat  - 
"targat  la  daflnad  aa  activa  alaaiant, 

"«dileh  has  ttavslad  at  laaat  IS  awtara  frca 
"start  point  (arbitrary  valua)  and  la  futbar 
"than  13  amtara  froa  finish  point.  Dlaablad 
"vahlclat  nay  also  ba  includad  if  daalrad. 

FLAG  •  0 
Y.MIH  -  13.0 

Y.MAX  >  (HUM.CP  •  CP. INTERVAL)  -  13.0 

for  I  •  1  to  HUM.ELIMEHT 
do 

If  (SPEEDdd))  >  0) 

If  EIJBCin.T(Ed))  >  Y.MIH 
if  BLBCHT.T(Ed))  <  Y.MAX 
TSI.LISTd)  -  1 
FLAG  •  1 

COUHT  •  OOURT  *  1 
andlf 
andif 
andlf 
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63 

6A  if  OBSTACLE. V(OB(I))  >  0 

65  DEAD.TGT.LIST(I)  -  1 

66  DEAD. COUNT  -  DEAD. COUNT  +  1 

67  andlf 

68  loop 

69  "no  tars*t> 

70  if  COUNT  -  0 

71  go  to  'BOTTOM' 

72  midlf 

73 

74  ■•loot  cat*  COUNT 

75  cat*  0 

76  FI  -  0 

77  caa*  1 

76  PI  -  1.0 

79  caa*  2 

80  FI  •  .8 

81  caa*  3 

82  PI  -  .7 

83  caa*  4 

84  PI  -  .6 

83  caa*  3 

86  FI  -  .3 

87  dafault 

88  PI  -  .4 

89  print  1  11a*  thua 

pi  dafauLtad  to  a  valu*  of  .4 

91  andaalaet 

92 

93  ROLL  •  ualfora.fCO.O,  1.0,  4) 

94 

93  P2  -  1  -  PI 

96 

97  if  COUNT  >  1 

98  P3  -  P2/(OOUNT  •  1) 

99  andlf 
100 

101  CUH.FRCT  -  0 

102  FIRST  -  0 

103 

104  for  I  -  1  to  NUM.KLOCNT 
103  do 

108  If  TOT.LlSTd)  >  0 

107  if  FIRST  -  0 

108  FIRST  -  1 

109  P.TGT(I)  -  PI 

110  CUM. PROS  •  CUM.FNOB  *  PI 

111  ala* 

112  F.Tei(I)  •  COM.PROB  ♦  P3 

113  CQN.IMn  -  CUM.PRON  *  P3 

114  aodlf 

113  andif 

118  loop 

117 

118  for  1  •  1  to  RUM.ELMNT 

119  do 

120  if  RCIX  <  P.TOTd) 

121  TOT  -  1 

122  laaa* 

123  andif 

124  loop 
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125  "dataimin*  location  of  tacgot 

126  XI  -  ELEMEHT.X(E(TGT)) 

127  Yl  •  ELEMENT. Y(E(TGT)) 

128 

129  If  GRAPH. OH  -  1 

130  ihow  RO(ID)  with  'rotankf .len" 

131 

132  If  STATUS(E(TGT))  •  0 

^  133  show  E(T6T)  with  'tankl.len' 

134  andlf 

133 

136  If  STATUS(E(T6T))  -  1 

»  137 

138  If  ELEMENT. TYPE(E(T6T))  •  1 

139  ahow  E(T6T)  with  'Ewplowl . Icn* 

140  andlf 

141 

142  If  ELIMENT.TYPE(E(TGT))  -  3 

143  ahow  B(TGT)  with  'tank 11. len' 

144  andlf 
143 

146  andlf 

147 

148  Lat  location. a(RO(ID))  -  location. fCX.Y) 

149  lat  location. a(E(ICT)>  -  location . f (XI , Yl ) 

130  andlf 

131  "pk  la  tha  probability  of  kill  givan  a  ahot 

132  ROLL  -  uniform. f(0, 1.7) 

133 

134  PK  -  .2 
133 

136  it  ROLL  <  PK 

137  If  STATUS(E(T6T})  na  0 
136 

139  TOTAL. LOST  -  TOTAL. LOST  *  1.0 

160  R.O.KIU  -  R.O.KILL  *  1.0 

161 

162  if  STATUS(E(TOT))  -  2 

163  LOST. TO. FIRES. 8YFASSI1IG  «  LOST. TO. FIRES. BYPASSING  +  1 

164  andlf 
163 

166  STATUS(E<TGT))  •  0 

167  SFEED(E(TOT))  •  0 

168  If  TIMS.OF.DEATB(TGI)  >  0 

169  print  2  linaa  with  TGI,  TOC.  (7.  DEATH  (TCI)  thua 
#M#  ERROR  IN  DIRECT  FIRE  --  KILLED  DEAD  TARffln 

TOT  waa  racordad  aa  killad  at  tima 

172  andlf 

173 

174  TOC.OP.DEAnKTGT)  •  tima.v 
173 

176  if  GRAPH. OR  -  1 

177  if  ELBCRT.TYPBIEd))  •  1 

178  ahow  E(TOT)  with  'dfWpLow.icn' 

'  179  alaa 

180  ahow  B(TOI)  with  'tank.ien' 

181  aodif 

>  162  lat  location. a(K(TGT))  •  location. fIXl.Tl) 

183  andlf 

184 

183  OHHTACU.XCOKVn))  -  XI 

186  ORSTAOE. 1(08(1171))  -  T1 
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187  OBS.RADIUSCOBCTGT))  -  ELEM. RADIUS (E<TGT ) ) 

188 

189  call  OBSTACLE. CONSOLIDATION 

190  call  CALENDAR. UPDATE 

191 

192  andlf 

193  endif 

194 

195  "IE  thara  ata  still  oovlns  Blua  vshlclas, 

196  ' ' aehtdula  anothac  shot  Eoz  this  f Irar 

197  if  FLAG  >  1 

196  call  R. DIRECT. OVERHATCH  givins  ID 

199  andlf 

200 

201  'BOTTOM' 

202 

203  catuzn 

204 

203  and  "DIRECT. FIRE 
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1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 
13 
18 

17 

18 

19 

20 
21 
22 

23 

24 
23 
26 

27 

28 

29 

30 

31 

32 

33 

34 
33 

36 

37 

38 

39 

40 

41 

42 

43 


coutin*  DISTANCE. TO. CP  glvan  ID  yielding  DISTANCE,  DEL.X,  DEl.Y 

' '  THIS  ROUTINE  DETERMINES  THE  DISTANCE  BETWEEN  THE  IDENTIFIED  ELEMENT 
"AND  THE  NEXT  CHECKPOINT  ON  THAT  ELEMENTS  MOVEMENT  PLAN. 

define  ID  ae  an  Integer  variable  "eleoent  Index 

define  CURR.CP  aa  an  Intagar  variable  "checkpoint  Index 

define  DISTANCE  aa  real  variable  ' '  dlatance  between  alaoiant  &  cp 

define  DEL.X  aa  a  real  variable  "difference  In  x 

define  DEL.T  aa  a  real  variable  "difference  In  y 

"datamlna  elaaant' a  currant  location 
' '  on  ita  reapeetlva  loovaaant  plan ,  than 
call  FIND. CURRENT. CP  giving  ID  yielding  CURR.CP 

If  STATUS(E(ID))  -  1 

' ' calculate  the  x  distance  between  the 
"next  checkpoint  and  the  alamant,  then 
DEL.X  -  MOVEMENT. PLANdD, CURR.CP  -4  1,1)  •  ELEMENT. X(E(ID)) 

"calculate  the  y  distance  between  the 
"next  checkpoint  and  the  elaaant,  then 
DEL.Y  -  MOVEMENT.  PLAN  (ID,  CURR.CP  *  1.2)  -  ELEMENT. YCECID) ) 

"use  the  pythagorlua  theorao  to  determine 
"the  atralgbt  line  distance  between  the 
"elasMnt  and  the  next  checkpoint  and 


if  STATUS(E(ID)) 


DEL.X  -  BYPASS. MAP (ID, CURR.CP  *  1,1)  -  ELEMENT. X(E(ID)) 

DEL.Y  -  BYPASS. MAPdO, CURB. CP  ♦  1,2)  -  ELEMENT. Y(EdD)> 

andlf 

"coopute  the  distance  between  the  points 
DISTANCE  -  a<|Ct.£(DEL.X**2  *  DEL.Y**2) 


return 

and  "DISTANCE. TO. CP 
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1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 
IS 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

30 

31 

32 

33 

34 
33 

36 

37 

38 

39 
80 
81 
82 


routine  DISTANCE. TO. MIME  liven  ID  yleldini  MINE. ID.  RANGE. TO. MINE 

"THIS  ROUTINE  DETERMINES  THE  CLOSEST  MINE  THAT  AN  ELEMENT  WILL  ACTUALLY 
"BIT.  INPUTS  ARE  THE  ELEMENT  ID.  THE  ROUTINE  RETURNS  THE  DISTANCE  FROM  THE 
"ELEMENT  TO  THE  NEXT  MINE  THAT  WILL  BE  HIT. 

define  ID  at  an  Intaiar  variable 
define  SLOPE  aa  a  real  variable 
daflne  INTERCEPT  aa  a  real  variable 
define  MINX. SLOPE  aa  a  real  variable 
define  Y. BOTTOM  aa  a  real  variable 
define  Y.TOP  aa  a  real  variable 
define  X.LEFT  aa  a  real  variable 
define  X. RIGHT  aa  a  real  variable 

define  MINE.  10  aa  an  Intagar  variable  "  id  of  cloaeat  ailne 

define  POSSIBLE. MINE  aa  an  integer  variable  "  id  of  candidate  nine 

define  DISTANCE. TO.HIHE. EMC  aa  a  real  variable 

daflne  RANGE. TO. MINE  aa  a  real  variable 

define  POSSIBLE. RANGE  aa  a  real  variable 

define  CURR.CF  aa  an  Intagar  variablea 

define  K  aa  an  Integer  variablea 

define  Xl,X2,X3,Yl,y2,y3  aa  real  variablea 

define  MISS.OIS  aa  a  real  variable  "dlatanee  of  ailne  center  from 

'  alaaent  path 

define  TRACK  aa  a  real  variable  "width  of  tingle  elaotant  track 

define  E. WIDTH  aa  a  teal  variable  "effective  elaaMnt  width 

"If  no  minee  are  found,  return  dlatanee  of 
' ' 1000  aetara  and  a  nine  id  of  0 

RAMS. TO. MINE  -  1000.0 
POSSIBLE. RANGE  •  1000.0 
HIHE.ID  •  0 

TRACK  •  TRACK.H10TB(E(ID)) 

call  FIND. CURRENT. CP  giving  ID  rialdlng  CURR.CF 
if  (CURR.CF  na  NUH.CF) 

"record  path  aquation  data 

SLOFE  -  NUVEMENT.FLAHdD.CURR.CF.S) 

INTERCEFT  •  MOVEMENT. PLAN (ID, CURR.CF, 4) 

"if  el  lent  la  currently  bypaaaing,  uae  the 
"bypaaa  aap  for  path  aquation  data. 

if  STATUS(B(IO))  •  2 

SLOFE  «  BTFASS.NAF(ID,CURR.CF.3) 

INTERCEPT  -  BYPASS. MAF(I0,CURR.CF,4) 
endif 


"act  flltara 

"filtera  are  uaad  to  oliBlnate 
"frea  Inapoction  thoaa  ad.nat  that 
"are  too  far  away  to  be  poaaible 
"aacountera.  Tbia  raducaa  the  nuabar 
"of  caleulationa  required. 

T. BOTTOM  -  ELEWXT.KEdD)) 

T.TOF  •  SLBBHT.KEdO))  *  (1.2*  CF.IHTEXVALl 

if  (MOVBCRT.FLAHdO.Caai.CF,!)  <  H0VB«NT.FUUI(ID.CURR.CF4'1,1)) 
X.LEFT  -  HOVBCNT.FLANdO.Cam.CF.l)  >  12.0 
X. RIGHT  •  HOVPCRT.PLANdO.CORR.CFt’l.l)  e  12.0 

olao 

X.LEFT  •  H0Va«NT.PLAHd0,CaRR.CFtl.l}  -  12.0 
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63 

64 

65 

66 
67 
66 

69 

70 

71 

72 

73 

74 

75 
78 

77 

78 

79 

80 
81 
82 

83 

84 

85 
88 

87 

88 

89 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 
100 
101 
102 

103 

104 
103 
106 
107 
106 

109 

110 
111 
112 

113 

114 
113 
116 
117 
116 

119 

120 
121 
122 
123 
U4 


X. RIGHT  -  MOVEMENT. PLAHdD. CURR. CP.  1)  +  12.0 
•ndlf 


' '  If  •IwMnt  la  in  bypaat  moda 
' *  adjuat  flltara  accordingly 

if  (STATUS<E(10))  -  2). 

IfCBYPASS.MAPdD.CURR.CP.l)  <-  BTPASS.MAPdD.CURR.CP+l,  1) ) , 

X.LEFT  -  BYPASS. MAPdD, CURR. CP.l)  -  12.0 
X. RIGHT  -  BYPASS. MAPdD.CURR.CP4-l,l)  *  12.0 

alaa 

X.LEFT  -  BYPASS. MAPdO.CURR.Cm.l)  •  12.0 
X. RIGHT  •  BYPASS. HAPdO.CURR.CP.l)  4-  12.0 
andlf 
andlf 

"uaa  flltara  to  raduca  tba  niaabar  of  mlnaa 
"asaminad  by  looking  at  aach  adna 

for  K  -  1  to  HUM. MINE 
do 

If  M1HE.STATUS(M(K))  >  0 
If  H1HE.Y(H(K))  >  Y. BOTTOM 
If  MIHE.Y(M(K))  <  Y.TOP 
if  HIRE.X(M(K))  >  X.LEFT 
If  MIHE.X(M(K))  <  X.RIGHT 


"calculata  alopa  of  llna  parplndlcular 
"to  path  aquation  ualng  H1*M2~-1 
MINE. SLOPE  -  -1.0  /  SLOPE 

"uaa  polnt-alopa  foraula, 

"y-yl^(s-zl)  to  davalop  aquation  for 
"■ina-llna.  eoablna  with  aquation  for 
"axivaatant  path  llna  to  aolva  for 
"  intaraaetlon  point 

XI  -  (MIHE.T<M<K))  -  IHTERCEPT  -  (MINE. SLOPE  •  MIHE.X(M(K) ) ) )  / 
(SLOPE  -  MINE. SLOPE) 

Yl  -  XI  *  SLOPE  *  INTERCEPT 

"eoagputa  odna  dlatanea  freai  novaoant  path 
X2  -  XI  •  NIHE.X(M(X)} 

¥2  >  Y1  •  HIHE.T(M(K)) 
nSS.DIS  -  S(]RT.F(X2**2  *  Y2**2) 


"coagTuta  otina  ancountar  dlatanea 
"froa  Bovlng  alaaant 
X3  •  XI  -  ELXICIIT.X(E(ID)) 

T3  -  T1  -  ELB«in.Y(E(IO)) 

DISTANCE. TO.MINX.ENC  •  S0RIT.F(X3**2  *  Y3**2) 


E.MIOTB  •  .3  •  ■az.t(HIDTB(E(ID)).PLOH.HIDTB(E(ID))) 
MI8S.DIS  •  MISS.DIS  -  RA0IUS(H(K)) 

if  (BLBBNT.TrPElBdD))  •  1)  and  (MISS.DIS  <  E.MIDTB) 
POSSIBLE. MINE  •  K 

POSSIBLE. RANGE  -  DISTANCE. TO. MINE. ENC 
andlf 

If  ELEWNT.TYFE(E(I0))  na  1 


aalaet  caaa  HINX.TTFKMIE)) 

oaaa  1  "  Influanea  nina 

If  (MISS.DIS  <  E.HIOTH) 
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125 

POSSIBLE. MINE  -  K 

126 

POSSIBLE. RANGE  -  DISTANCE. TO. MINE. ENC 

127 

•ndlt 

128 

129 

caan  2  "  praaauxa  ailna 

130 

It  ((MISS. SIS  <  E. WIDTH)  and  (MISS.DIS  : 

131 

POSSIBLE. MINE  •  K 

132 

POSSIBLE. RANGE  -  DISTANCE. TO. MINE. ENC 

133 

•ndlt 

134 

135 

eaan  3  "  contact  a^na 

136 

It  (MISS.DIS  <  E. WIDTH) 

137 

POSSIBLE. MINE  -  K 

136 

POSSIBLE. RANa  -  DISTANCE. TO. MINE. ENC 

139 

•ndlt 

140 

141 

•ndaalaet 

142 

•ndlt 

143 

144 

It  POSSIBU. RANGE  <  RANGE. TO. MINE. 

145 

MINE. ID  -  POSSIBLE. MINE 

146 

RANGE. TO. MINE  •  POSSIBLE . RANGE 

147 

•ndlt 

148 

•ndlt 

149 

•ndlt 

150 

•ndl£ 

151 

•ndlt 

152 

•ndlf 

153 

154 

loop 

155 

156 

•ndlt 

157 

158 

rotuzn 

159 

160 

•nd  ' 

DISTANCE. TO.mNE  adltad  31  Julr  91 

>  (E. WIDTH  -  TRACK))) 
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1  function  DISTANCE. TO. OBS  glvan  ID  yloidlng  DISTANCE 

2 

3  ' '  DETERMINES  THE  DISTANCE  TO  THE  NEXT  OBSTACLE  FOR  THE  GIVEN  ELEMENT 

4 

3  dofln*  ID  an  Intagar  vaclabla 

6  daflna  DISTANCE  aa  a  caal  vaclabla 

7  daflna  OBS. ID  aa  an  Intagar  vaclabla 
6  daflna  E.X  and  E.Y  aa  caal  vaclablaa 
9  daflna  CURR.CP  aa  an  Intagac  vaclabla 

10  daflna  C.T  as  a  caal  vaclabla 

11  daflna  SLOPE  as  a  caal  vaclabla 

12  daflna  Y.INT  aa  a  caal  vaclabla 

13  daflna  K  as  an  Intagsc  vaclabla 

14  daflna  RANGE. TO. OBS  aa  a  caal  vaclabla 

15  daflna  CANDIDATE . OBS  aa  an  Intagsc  vaclabla 

16  daflna  PTIY  aa  a  caal  vaclabla 

17  daflna  PT2Y  as  a  caal  vaclabla 

18  daflna  PTIX  aa  a  caal  vaclabla 

19  daflna  PT6X  as  a  caal  vaclabla 

20  daflna  PT2X  as  a  caal  vaclabla 

21  daflna  SLP.A  as  a  caal  vaclabla 

22  daflna  SLP.F  as  a  caal  vaclabla 

23  daflna  Y.I.A  aa  a  caal  vaclabla 

24  daflna  Y.I.F  aa  a  caal  vaclabla 

23  daflna  INTERCEPT. X. 1  as  a  caal  vaclabla 

26  daflna  INTERCEPT. X. 2  aa  a  caal  vaclabla 

27  daflna  X,  Y  aa  caal  vaclablaa 

28  daflna  SIDE  as  an  Intagac  vaclabla  ' ' flag  paasad  to  bypass  -  Indlcatss 

29  "ahlch  aids  to  pass  on 

30  DISTANCE  •  10000.0 

31  RANIS. TO. OBS  -  10000.0 

32  OBS. ID  -  1 

33 

34  If  STATUS(E(ID))  ns  2 

33  "datscalna  «hat  poctlon  of  sMp  Is  balng  ussd 

36  call  FIND. CURRENT. CP  giving  10  yloidlng  CURR.CP 

37 

38  E.X  •  ELEICRT.X(B(ID)) 

39  E.Y  -  EUMOrr.TIEdO)) 

40  C.Y  •  HGVBMEHT.FLANdD.CURR.CPtl.X) 

41  SLOPE  -  MOVnan.PLARdD.CURR.CP.S)  "al 

42  Y.INT  -  M0VBCNT.FLAHdD,CURX.CP,4)  "bl 

43 

44  foe  K  •  1  to  INM.anTACLE 

43  do 

46  "it  obstcuctlon  szlsts,  build  bos  foe  It 

47  If  an.RAOIUS(OB(X))  >  0 

48  call  HAXE.HEX  giving  ID.  K 

49  FTIT  •  PT1.T(08(K)) 

30  PT2T  •  PTa.y<(«(K)) 

31 

32  "dotsesdno  la  obstacls  can  ba  aneountacad 

33  "In  ouccont  Intacval . 

34  If  (PT2T  >  E.Y) 

33  If  <PT1T  <  C.Y) 

36  "dstacBlno  Intoceapt  point,  chock  foe  ancountac 

37  FT6E  •  PT8.X(0N(K)> 

38  prix  •  PTi.x(ae(K)) 

39  PT2X  •  Pra.X(0i(K)) 

60 

61  SLP.A  -  SLOPE. A(CN(K))  "a3 

82  SLP.F  -  SLOPE. F(0B(K))  "a2 
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63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 

78 

79 

80 
81 
82 
83 
64 
63 
66 

87 

88 

89 

90 

91 

92 

93 

94 
93 

96 

97 
96 
99 

100 


Y.I.A  -  Y.II»I.A(OB(K))  "h2 
Y.I.F  -  Y.Iirr.r(OB<K))  ''b2 

INTERCEPT. X.l  -  {Y.I.A  -  Y.INT)  /  (SLOPE  -  SLP.A) 
INTERCEPT. X. 2  -  (Y.I.F  -  Y.INT)  /  (SLOPE  -  SLP.F) 

If  (PTIX  <  INTERCEPT. X.l)  and  ( INTERCEPT . X . 1  <  PT2X) 
X  -  INTERCEPT. X.l 

Y  -  (SLP.A  •  X)  ♦  Y.I.A 
CANDIDATE. OBS  -  K 

RAHa.rO.OBS  -  «irt.f((X  -  E.X)*»2  +  (Y  -  B.Y)»*2) 
SIDE  -  1 
•ndlf 

If  (PTSX  <  IIITERCEPT.X.2)  and  ( INTERCEPT. X. 2  <  PTIX) 
X  -  INTERCEPT. X. 2 

Y  -  (SLP.F  •  X)  ♦  Y.I.F 
CANDIDATE. OBS  •  K 

RANGE. TO. OBS  -  tqrt.f((X  -  E.X)**2  ♦  (Y  -  E.Y)**2) 
SIDE  -  2 
andlf 
andlf 
andlf 
andlf 

If  RAWS. TO. 088  <  DISTANCE 
DISTANCE  •  RAMK.TO.OBS 
OBS.  ID  -  CANDIDATE. 088 
call  BYPASS  glvlna  ID,  OBS. ID,  SIDE,  X,  Y 
andlf 

Loop 

andlf 

raturn 


and  "DISTANCE. TO. <»8  adltad  23  AUG  91 
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1  routine  FIND. CURRENT. CP  (iv«n  ID  yielding  CURR.CP 

2 

3  "THIS  ROUTINE  DETERMINES  WHICH  CHECKPOINT  ON  THE  MOVEMENT . PLAN 
*  "IS  CURRENT  FCR  A  GIVEN  ELEMENT 

5 

6  define  ID  at  an  Integer  varlablea 

7  define  CURR.CP  aa  an  Integer  variable 

8  define  J  aa  an  Integer  variable 

9 


10 

If  ((STATUS(E(ID))  •  1)  or 

(STATUSCEdO))  -  0)). 

11 

for  J  -  1  to  NUM.CP  do 

"check  each  checkpoint  In  order. 

12 

'  ‘  looking  for  the  currant  one  for 

13 

' '  alaaMnt  ID . 

14 

It  MOVEMENT. PLAH( ID. J, 

3)  >  0. 

13 

"««hen  found,  record  the  Index 

16 

CURR.CP  >  J 

17 

' ' end  exit  the  loop 

18 

leave 

19 

endlf 

20 

loop 

21 

endlf 

22 

23 

If  STATUS(E(I0))  -  2 

24 

for  J  •  1  to  4  do 

23 

If  BYPASS. MAPCIO.J, 3) 

>  0.  "look  for  active  atatua  flag 

26 

"  (bypaaa.auip(*.*.3)  >  0} 

27 

28 

CURR.CP  >  J 

"«han  found,  record  that  point  and 

29 

leave 

' ' exit  loop 

30 

endlf 

31 

loop 

32 

endlf 

33 

34 

return 

"return  currant  ep  Index 

33 

38 

and  "FIND. CURRENT. CP 
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1  routln*  FULL. PLOW  (Ivcn  10,  MIME. ID 

2 

3  "THIS  ROUTIME  MOVES  MIKES  EMCOUNIERED  BY  FULL  PLOWS 

t 

3  dafin*  ID  ai  an  Intagar  variabla 

6  daflna  MINE. ID  ai  an  Intagar  variabla 

7  daflna  X.ID  aa  raal  variablaa 

8  daflna  X.H,  Y.M  aa  raal  variablaa 

9  daflna  X,  Y  aa  raal  variablaa 

10  daflna  HEW.X.M,  MEW. Y.M  at  raal  variablaa 

11  daflna  PLOM.WID  aa  a  raal  variabla 

12  daflna  DISPLACEMEHT  at  a  raal  variabla 

13 

1*  X.ID  •  ELBCMT.XCEdD)) 

IS  X.M  a  HINE.X(M(HIHE.I0)) 
le  Y.M  -  MIME.Y(M(MIHE.ID)) 

17  PLOW.WID  -  PLOM.WIDTB(E(ID))/2.0 

18 

19  If  MIME.STATUS(M(MIHE.ID))  na  0 

20 

21  "  — thaaa  nuabart  will  not  allow  rollback 

22  "If  rollback  daalrad,  ranova  tba.f 

23  DISPLACEMEHT  -  aba.f(norMl.f(0,  .25,  S)) 

2A 

25  If  X.M  <  X.ID  "dltplaea  latt 

26  HEW.X.M  a  X.ID  -  (FLOW.WID  *  DISPLACEMEHT) 

27  alaa  "dltplaea  right 

28  HEW.X.M  a  X.ID  a  (PLOW.WID  *  DISPLACEMENT) 

29  andlf 

30 

31  HEW.  Y.M  a  X.M 

32 

33  HIHE.X(M(MIHS.ID))  a  HEW.X.M 
3A  MIHE.Y(M(MIHE.ID))  a  HEW. Y.M 
33 

36  If  GRAPH. OH  a  1 

37  arata  M(MIHB.ID) 

38  aalaet  eaaa  HIHE.TYPE(M(HIHE.ID)) 

39  eaaa  1 

AO  ahow  M(KIHB.ID)  with  'ralna.lcn' 

AI  eaaa  2 

A2  ahow  M(MIHE.ID)  with  'bbalDa.lcn' 

A3  eaaa  3 

AA  ahow  M(MIHE.ID)  with  'blalDt.lcn' 

AS  andaalact 

A6 

A7  X  a  H1HX.X(N<MIHE.ID)) 

A8  T  a  MIHE.T(N(MIHX.ID)) 

A9  lat  loeatioa.a(M(MIHE.ID))  a  Locatloa. f (X, Y) 

SO  aodlf 

31  aodlf 

32 

33  ratun 

3A  aod  "routlna  PULL. PLOW 
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1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 
23 
26 

27 

28 

29 

30 

31 

32 

33 

34 

33 

36 

37 

38 

39 

40 

41 

42 

43 

44 
43 

46 

47 

48 

49 

30 

31 

32 
S3 

34 

33 

36 

37 

38 

39 
60 
61 
62 


routlna  GET. DATA 


dafln*  DEVPTR  a*  a  polntar  variabla 

daflna  MASTER. FORM  aa  a  polntar  variabla 
daflna  INPUT. FORM  as  a  polntar  variabla 
daflna  FK.FORM  as  a  polntar  variabla 


daflna  TF.FORM  aa  a  polntar  variabla 


' ' polntar  to  taskforca  manu 


daflna  FLOHl.FCilM  as  a  polntar  variabla 
daflna  PLOHE.FORM  as  a  polntar  variabla 
daflna  FWFLOM.FORM  aa  a  polntar  variabla 
daflna  TWPLOM.FORM  aa  a  polntar  variabla 


' ' polntar 
' '  polntar 
' ' polntar 
‘ ' polntar 


to  plowl  (fw)  manu 
to  plow2  (tw)  manu 
to  fifplow  stanu 
to  tnplow  manu 


daflna  TRACKl.FORM  aa  a  polntar  variabla 
daflna  TRACKS. FORM  aa  a  polntar  variabla 
daflna  TRACKS. F(R)H  aa  a  polntar  variabla 


"polntar  to  track  1  manu 
"polntar  to  track  2  manu 
"polntar  to  track  3  manu 


daflna  MINE . OAT . FORM  aa  a  polntar  variabla 


daflna  DISTANCE  as  a  raal  variabla 
daflna  FIELD. ID  as  a  tart  variabla 
daflna  FIELD. ID. 2  aa  a  tart  variabla 


opan  unit  2  for  output, 
flla  nasM  Is  'OUTFILE' 
uaa  2  for  output 

call  DEVIN1T.R<'VT,0«APH1C')  ylaldln*  DEVPTR 
open  7  for  Input,  davlea  •  DEVPTR 
opan  8  for  output,  davlea  •  DEVPTR 
usa  8  for  t»FDle  output 

"Dafault  valuas  for  taakforea  Input  form 


show  TF.FORH  with  'tf.frm' 

lat  ddval.a(dflsld.f('rULL.PLC»r,  TF.FCRM))  -  F.FLOHS 
lat  ddval.a(dflald.f('TRACK.FLOM',  TF.FCRM))  -  T. PLOWS 
1st  ddval.aCdflsld.fC'TRACKl',  TF.FCRM))  •  TRACKl 
lat  ddval.a(dflsld.f('TRACK2'.  TF.FCRM))  -  TRACKS 
lot  ddval.a<dflold.f('TIIACK3',  TF.FCRM))  -  TRACKS 


"Dafault  valuaa  for  vahlcls  tppa  1  (full  width  plow) 


show  FLOHl.FCRM  with  'plowl. fra' 

lot  ddval.a(dfiald.f(*l(AV.E8RCR',  FLOHl.FCRM))  •  HAV.ERR.l 
lat  ddval.aCdflald.fC'TAHK.HIDTB',  FLOHl.FCRM))  -  E. WIDTH. 1 
1st  ddval.aCdfiald.fC'TAMK.LEMGTB'.  FLOHl.FCRM))  -  E. LENGTH. 1 
1st  ddval.aCdtlsld.f ('TRACK. HIDTB',  FLOHl.FCRM))  >  E. TRACK. WIDTH. 1 


"Dafault  valuaa  for  full  width  plow  apaelfleatlon  Input  tom 
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63  ihow  FWPLOH.FORM  with  'fwplow. ftm' 

64 

65  l«t  d<lv«l.a(dfi«ld.f("PLOM.ErFECTIVEHESS”,  FWPLOW.PORM))  -  PLOW . EFFECT .  1 

66  l«t  ddv«l.«<dfi«ld.f('PLOW. WIDTH”,  FWPLOW.FORM) >  -  PLOW. WIDTH. 1 

67  lat  ddval.a(dflald.f ('PLOW. SPEED”,  FWPLOW.FORM))  -  E. SPEED. 1 

68  " . - - - - - 

69 

70 

71 

72 

73 

74  “Datault  valuaa  for  vahlela  typa  2  (track-width  plow) 

75  ■  1.  —  ...  I 

78 

77  show  PLOWS.FORM  with  ”plow2.frm” 

78 

79  lat  ddval.a(dtiald.2(”HAV. ERROR”,  PLOW2.FORM))  -  HAV.ERR.2 

80  lat  ddval.a(dfiald.f(”TAnC. WIDTH”,  PLOWR . FORM) )  •  E. WIDTH. 2 

81  lat  ddval.a(dfiald.f(”TAMK. LENGTH”,  FLOW2.FORH))  -  E. LENGTH. 2 

82  lat  ddval.a(dflald.f ('TRACK. WIDTH”,  PL0W2.FCRM))  -  E. TRACK. WIDTH. 2 

83  " . - - - 

84 

85  "Oafault  valuaa  for  track  width  plow  apaclfication  input  form 

86  •'  I  M  ■  '  I  — 

87 

88  chow  THPLOW.FORH  with  'twplow.frm” 

89 

90  lat  ddval.a(dflald.f(”PLOW.EFFECTIVEHESS”,  TWPLOW.FORH))  >  PLOW. EFFECT. 2 

91  lat  ddval.a(dflald.f(”PLaW.WlDTH”,  TWPLOW.FORH))  •  PLOW. WIDTH. 2 

92  lat  ddval.a(dfiald.f(”PLOH.SPEED',  TWPLOW.FORH))  >  E. SPEED. 2 

93  lat  ddval.a(dflald.f(”EFF. WIDTH”,  TWPLOW.FORH))  -  EFF. WIDTH 

94  " . . . 

95 

96 

97  "Oafault  valuaa  for  vahiela  typo  3  (track  typa  1) 

98  "i  li-  ■■■  ii.-i— ■— I  .....I— 

99 

100  ahow  TRACXl.FCRM  with  'traekl.frm” 

101 

102  lat  ddval.a(dfiald.f('HAV. ERROR”,  TRACKl.FORM) )  -  HAV.ERR.3 

103  lat  d«lval.a(dfiold.f('TARK.WIDTH',  TRACKl.FORM))  •  E.HIDTH.3 

104  lot  ddval.aidfiold.fi'TANK.LKNGTH”,  TRACKl.FORM))  -  E. LENGTH. 3 

105  lat  ddval.a(dfiald.f('TRACK.HIDTH”,  TRACKl.FORM))  •  E. TRACK. WIDTH. 3 

106  " . . 

107 

108 

109  "Dofault  valuaa  for  vahiela  typa  4  (track  typo  2) 

110  "  ■■■■  .1-  .  .  . . 

111 

112  ahow  TRACK2.T0RM  with  'traek2.ftm' 

113 

114  lat  iMval.a(dfiold.f('HAV. ERROR”,  TRACKS. FORM))  -  HAV.ERR.4 

115  lot  ddval.aCdfiald.^'TAHK.WIOTB”,  TRACKS. FORM))  •  E. WIDTH. 4 
lie  lot  ddval.a(dfiold.f('TAHK. LENGTH”,  TRACKS. FORM))  -  E. LENGTH. 4 

117  lat  ddval.a(dfiald.f(”TRACK.WIDTH',  TRACKS. FORM))  •  E. TRACK. WIDTH. 4 

118  " - 

119 

150 

151  "Dofault  valuaa  fox  vahiela  typo  5  (track  typo  3) 

122  "  ■■  I.  I  II  II 

153 

154  ahow  TRACKS. FORM  with  'tracks. fxm' 
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125 

126  l«t  ddval.aCdfiald.fCNAV. ERROR".  TRACK3.F0RM>)  -  NAV.ERR.S 

127  lat  ddv«l.«(dfi«ld.f("TANK. WIDTH",  TRACK3  .FCSM) )  -  E. WIDTH. 5 
126  let  ddval.a(d£l*ld.f("TAinC. LENGTH".  TRACKO.FORM) )  -  E. LENGTH. 5 

129  lat  ddval.a(dfiald.£("TRACK. WIDTH",  TRACKS. FC»IM))  •  E. TRACK. WIDTH. 5 

130  " - - - 

131 

132 

133 

134  "Dafault  valuaa  for  minafiald  data  form 

135  — — . . 

136 

<  137  show  MINE. DAT. FCSM  with  "mlnadat . f zn" 

138 

139  lat  ddval.a(d£iald.£('P. HINES",  MINE. DAT. FORM))  -  P. MINES 

140  lat  ddval.a(d£laLd.£("I.HlHES".  MINE. DAT. FCSM ) )  -  I. HINES 

141  lat  ddval.a(d£iald.£("C.HlNES".  MINE. DAT. FORM))  -  C. MINES 

142  lat  ddval.a(d£lald.£("T. MINES",  MINE. OAT. FORM))  >  T. HINES 

143  lat  ddval.a(d£lald.£("W.MINES",  MINE. DAT. FORM))  -  W.MINES 

144  " - - 

145 

146 

147 

146  "Oa£ault  valuaa  £or  oilna  apaeiflcatloo  input  form 

149  ii--  ■  ■  ..  . I 

150 

151  ahow  PK.FORM  with  "pk£ora.£za" 

152 

153  lat  ddval.a(d£lald.£("P. RADIUS",  PK.FORM))  •  P. RADIUS 

154  lat  ddval.a<d£lald.£('I .RADIUS',  PK.FORM))  •  I. RADIUS 

155  lat  ddval.a(d£lald.£('C. RADIUS',  PK.FORM))  -  C.RADIUS 

156  lat  ddval.a(d£lald.£('T.RAOIUS",  PK.FORM))  -  T.RADIUS 

157  lat  ddval.a<d£lald.£('W.RADlUS",  PK.FORM))  •  H. RADIUS 

158 

159  lat  ddval.a(d£lald.£('OHE.aRE',  PK.FORM))  -  MINE.PKCl, 1) 

160  lat  ddval.a(d£laU.t('ailE.T>IO',  PK.FORM))  >  HIRE.PK(1,2) 

161  lat  ddval.a(dflald.£('aRE. THREE",  PK.FORM))  -  MINE.PK(1,3) 

162  lat  ddval.a(d£laU.£('OIIE.FOfni',  PK.FORM))  >  HINE.PK(1,4) 

163  lat  ddval.aldflald.fC'OHE.FirE",  PK.FORM))  •  HIRE.PK(1,3) 

164 

165  lat  ddval.a(d£lald.£('TMO. ORE",  PK.FORM))  •  MINE.PK(2,1) 

166  lat  ddval.a(dflald.£('TM0.1H0'.  PK.FORM))  -  HIRE.PK(2.2) 

167  lat  ddval.a(d£iald.£("IHO.THIIEE',  PK.FORM))  -  MIHE.PK(2,3) 

166  lat  ddval.aCdflald.El'TMO. FOUR",  PK.FORM))  •  HIHK.FK(2,4) 

169  lat  ddval.a(d£iald.£('TMO.Fm’,  PK.FORM))  -  HIRE.PK(2,S) 

170 

171  lat  ddval.a(d£iald.£("TBIEE.ORE'.  PK.FORM))  •  HIRE.PK(3,1) 

172  lat  ddval.aldflald.fC'THREE.THO",  PK.FORM))  -  MIHE.FK(3,2) 

173  lat  ddval.aldf laid. £('THREE. THREE",  PK.FORM))  •  HINE.PK(3,3) 

174  lat  ddval.a(dfiald. {("THREE. FOUR",  PK.FORM))  -  HINE.PK(3,4) 

173  lat  ddval.a(d{lald. {("THREE. FIVE",  PK.FORM))  •  MINE.FKO.S) 

176 

177  lat  ddval.a(d{lald.{('FOOR.CHE",  PK.FORM))  -  HIHE.PK(4.1) 

176  lat  ddval.a(d{lald.{("FOaR.TMO",  PK.FORM))  •  MIHE.PK(4,2) 

'  179  lat  ddval.a(d{lald. {("FOUR. THREE".  PK.FORM))  -  MIHE.FK(4.3) 

160  lat  ddval.a(d{lald.{('FO(A.FOUR",  PK.FORM))  •  HINE.PK(4,4) 

161  lat  ddval.a(d{iald. {("FOUR. FIFE",  PK.FORM))  -  MINE.PK(4.3) 

.  182 

163  lat  ddval.a(d{lald. {("FIFE. ORE",  PK.FORM))  -  MIHE.PK(S.l) 

164  lat  ddval.a(d{tald. {("FIFE. TWO",  PK.FORM))  •  HIIIR.PK(S,2) 

163  lat  ddval.a(d{lald. {("FIFE. THREE",  PK.FORM))  -  HIRK.PK(3,3) 

186  lat  ddval.a(d{lald. {("FIFE. POOR',  PK.FORM))  -  HIIIE.PK(3.4) 
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187  l«t  ddval.aCdtlald. {('FIVE. FIVE'.  FK.FORM))  -  MINE.FKCS.S) 

188 

189 

190  ' '  inltlallaa  polntar  to  maatar  input  form 

191  ” - - - 

192  shott  MASTER. FOm  with  'aastar.Ttm' 

193 

194 
193 

196  a 

197 

198 

199  '* - - - - - - - - 

200  ' 

201  ' '  DATA  EHIRY 

202 

203  ' '  ■  ■■■■  . — i  I  . —  I 

204 
203 
206 

207  'MASTER' 

208 

209  lat  FIELD. ID. 2  «  aeeapt.f(MASTER.F0iM,0) 

210 

211  aalaet  eaaa  FIELD. ID. 2 

212 

213  eaaa  'MXEL.PARAM' 

214  "aodal  paraaatar  input  aeraan 

213  to  to  'MASTER' 

216 

217  eaaa  'SCBR.ROII.PARAM' 

218  "  aeanaxio/tun  paraMtara  input  aeraan 

219  to  to  'MASTER' 

220 

221  eaaa  'TASBrWCE.DAIA' 

222 

223  'TASXFOitCr 

224  lat  FIELD. ID  >  aeeapt.£(TF.PCRH,0) 

223 

226  lat  F. PLOWS  •  ddval.a(dClald.£<'FtRX.PLaW',  TP. FORM)) 

227  lat  T.FLOMB  •  ddval.a(d<lald.f(''TRACK.PLOH',  TP. FORM)) 

228  lat  IRACKl  •  ddaal.a(d£iald.£(‘'TSACKl',  TP. FORM)) 

229  lat  ZRACK2  •  ddval.a(dflald.f ("TRACES',  IF.P0RM>> 

230  lat  TRACKS  •  ddral.aCdfiald.f ('TRACKS',  TP. FORM)) 

231 

232 

233  aalaet  eaaa  FIELD. ID 

234  eaaa  'ED.F.PLOH' 

233 

238  lat  FIELD. ID  -  aeeapt.f(FLCMl.FCRM.O) 

237 

238  lat  RAV.ERR.l  •  ddiral.a(dtiald.f('HAV.ERROR',  PLOHl.FORM)) 

239  lat  E. WIDTH. 1  •  ddTal.a(dXiald.£('TAllK.WIDTB',  PLOHl.F(XIH)) 

240  lat  E.LBRBIH.l  -  ddval.a(d£lald.Z('TAIIK.LEimB',  PLOHl.FCRM)) 

241  lat  E.TRACK.WlDTB.l  •  ddval.a(dftald.f ('TRACK.WIDTB',  PLOWl.FORM))  » 

242 

243  lat  FIELD. ID  «  aeeapt.e(FWPLaW.FCRM,0) 

244 

243  lat  PLOM.EFFICI.l  •  ddaal.a(d£lald.t('PL0W.EFFECTIVERES8',  FWPLOH.FORH))  * 

246  lat  FLCM.HIOTH.l  •  d4aal.a(4Clald.t('PLCM.MI0TH',  FWPLOW.FORM)) 

247  lat  E. SPEED. 1  «  ddval.a(6flalid.f('PiaW.8FKED',  FWPLOW.FCRM)) 

248 
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249  (O  to  'TASKFORCE' 

250 

231  €•*•  "ED.  T.  PLOW* 

232 

233  lot  FIELD. ID  -  aecapt . f (FLaW2.FCffiM, 0) 

234 

233  lat  HAV.ERH.2  -  ddval.a(df laid. £("HAV. ERROR",  PL0W2.F0RM)) 

236  lat  E. WIDTH. 2  -  ddval.a(d£lald.£("TAinC. WIDTH",  PLaW2.FORM)> 

237  lat  E. LENGTH. 2  -  ddval.a(dflold.£("TAHK. LENGTH",  PLOW2.FOSM)) 

,  238  lat  E. TRACK. WIDTH. 2  -  ddval.a(dflald.f("TRACK. WIDTH",  PLOW2.FORM}) 

239 

260  lat  FIELD. ID  -  aeeapt.{(TWPLOW.FORM.O) 

261 

'  262  lat  PLOW. EFFECT. 2  -  ddval.a(d£lald.£("PLOW. EFFECTIVENESS",  TWPLOW.FORM) ) 

263  lat  PLOW. WIDTH. 2  -  ddval.a(dflald.t("PLOW.WIDTB',  TWPLOW.FORM)) 

264  lat  E. SPEED. 2  -  ddval.a(dflald.t('FLOW. SPEED",  TWPLOW.FORM)) 

263  lat  EFF. WIDTH  -  ddval.a<dflald.f("EFF. WIDTH",  lWFLOW.F(ffiM) ) 

266 

267  (O  to  'TASKFORCE' 

266 

269  caaa  "ED.Tl" 

270  lat  FIELD. ID  -  aecapt. £(TRACX1.F0(IM,0) 

271 

272  lat  HAV.ERR.3  -  ddval.a(dClald.£("NAV.ERROR',  TRACKl.FORM) ) 

273  lat  E. WIDTH. 3  -  ddval.a(dfiald. {("TANK. WIDTH",  TRACKl.FOtM)) 

274  lat  E. LENGTH. 3  -  ddval.a(dflald.f("TANK. LENGTH",  TRACKl.FORM)) 

273  lat  E.IRACX.WIOTB.3  -  ddval.aldflald.frTRACX.WIDTB",  TRACKl.FORM)) 

276 

277  (o  to  'TASKFORCE' 

278 

279  eaaa  "ED.T2" 

260  lat  FIELD. ID  -  aecapt. {(TRACKS. FORM, 0) 

281 

262  lat  MAV.ERR.a  -  ddval.a(d{lald.f('NAV.ERRaR',  IHACKS.FORM)) 

263  lat  E. WIDTH. 4  -  ddval.a(d{lald. {('TANK. WIDTH",  TRACKS. FORM)) 

264  lat  E. LENGTH. 4  •  ddval. a(dfiald. f ("TAHK.LENGTH",  IRACK2.FORM) ) 

283  lat  E.TRACK.WIDTH.4  -  ddval.a(dftald. {('TRACK. WIDTH",  TRACK2.F0RM) ) 

286 

267  to  to  'TASKFORCE' 

288 

269  caaa  "E0.T3" 

290  lat  FIELD. ID  •  aecapt. {(TRACKS. FORM.O) 

291 

292  lat  HAV.ERR.S  •  ddval.a(d{lald.{('HAV.ERR0R',  TRACKS. FORM)) 

293  lat  {.WIDTH. 3  -  ddval.a(d{iald.{('IARK.WIDTH",  TRACKS. FORM)) 

294  lat  {.LENGTH. 3  -  ddval. a(d{lald. {('TANK. LENGTH",  TRACK3 .FORM) ) 

293  lat  {.TRACK. WIDTH. 3  •  ddval. a(d{lald.{('TRACK.WIDTH',  IRACX3.F0RH)) 

296  _ 

297  60  to  'TASKFORCE' 

298 

299  eaaa  "TF. RETURN" 

300 

301  80  to  'MASTER' 

302 

.,  303  andsalact  "{laid,  id 

304 

303  eaaa  "MIHKFIELD.OATA' 

300 

>  307  'MINEFIELD' 

308 

309  lat  FIELD. ID  •  aeeapt. {(MINE. OAT. FORM.O) 

310 


117 


ROOTIHE  (OT.OATA  CACI  PC  SIH5CKIPT  II. S  (R)  v2.3  FASE  33 

OPTIONS  /HEW/NOHARN/LINES>6S  09/14/1991  20:27:16 


311 

312 

313 

314 

315 

316 

317 

318 

319 

320 

321 

322 

323 

324 
323 
328 

327 

328 

329 

330 

331 

332 

333 

334 
333 

336 

337 

338 

339 

340 

341 

342 

343 

344 
343 

346 

347 

348 

349 

330 

331 

332 

333 

334 
333 

336 

337 

338 

339 

360 

361 

362 

363 

364 
363 

366 

367 

368 
360 

370 

371 

372 


lat  P. MINES 
let  I. MINES 
let  C. MINES 
l«t  T. MINES 
let  W. MIRES 


ddval. aCdflcld. {("P. MINES' , 
ddval . •<dfi«ld. £('I .MINES' , 
ddval . aCdflald. £('C .MINES' . 
ddval . « ( dtlald . f ( 'T .MINES' . 
ddval  .a(dflald. £(*%>.  MINES' , 


MINE. DAT. FORM)) 
MINE. DAT. FORM)) 
MINE.  DAI.  FORM)) 
MINE.  DAT.  FORM)) 
MINE.  DAT.  F(»M)) 


if  FIELD. ID  -  'M.EDIT' 


lat  FIELD. ID  -  aceapt . f(FK. FORM, 0) 


Lat  P. RADIUS 
lat  I. RADIUS 
lat  C. RADIUS 
lat  T. RADIUS 
lat  W. radius 


-  ddval. a(dtlald.f('P. RADIUS',  PE. FORM)) 

-  ddval. a(dfiald.f('I. RADIUS',  PE. FORM)) 

-  ddval. a(dtiald.f('C. RADIUS',  PE. FORM)) 
•  ddval. a<dtlald.f('T.RADIUS'.  PE. FORM)) 

-  ddval. a(dfiald.t('H. RADIUS',  PE. FORM)) 


lat  MIRB.PE(l.l) 
lat  MINE.FE(1,2) 
lat  MIHE.PE(1,3) 
lat  MIME.PEa,4) 
lat  M1HE.FE(1.3) 


-  ddval. a(dflald.t('ORE. ORE',  PE.FQWt)) 

-  ddval. aCdflald.f ('ONE. TWO',  PE. FORM)) 

•  ddval. a<dflald.f('ONE. THREE',  PE. FORM)) 
>  ddval. a(dflald.f ('ONE. FOUR',  PE. FORM)) 

-  ddval. a(dflald.f<'ORE. FIVE',  PE. FORM)) 


lat  HIHE.PE(2,1) 
lat  MINE.PE(2,2) 
lat  MIRE.PE(2,3) 
lat  MINE.PK(2,4) 
lat  MIRE.PK(2,3) 


-  ddval. aldf laid. f( 'TWO. ONE',  PE.FORM)) 

-  ddval. a(dflald.f('THO. TWO',  PE.FORM)) 

-  ddval. a(d£lald.f('lWO. THREE',  PE.FORM)) 

-  ddval.a(d£lald.£('THD.FOUR',  PE.FORM)) 

-  ddval. a(d£lald.£<'IMO. FIVE',  PE.FORM)) 


lat  MIHE.PE(3.1) 
lat  M1NE.PE(3,2) 
lat  M1IIB.FE(3,3) 
lat  MIHE.PE(3,4) 
lat  M1HE.PE(3,3) 


-  ddval. a(d£lald.£('THREB. ORE',  PE.FORM)) 

■  ddval. a(d£iald.£('THREE. TWO',  PE.FORM)) 

•  ddval. a(d£lald.£('THRBE. THREE',  PE.FORM)) 

-  ddval. a(d£laLd.£('THREE. FOUR',  PE.FORM)) 

•  ddval. a(d£lald.£('TBREE. FIVE',  PE.FORM)) 


lat  HIHE.PE(4,1) 
lat  MIHE.PE(4,2) 
lat  MIHE.PE(4.3) 
lat  MIHE.PE(4,4) 
lat  MINE.PE(4,3) 


-  ddval. a(d£lald.£('FOUR. ONE',  PE.FORM)) 

•  ddval. a(d£lald.£('FOUR. TWO',  PE.FORM)) 

•  ddval. a(d£iaU.£('FaUR. THREE',  PE.FORM)) 

-  ddval. a(d£lald.£('FOUR. FOUR',  PE.FORM)) 

•  ddval. a(d£lald.£('POUR. FIVE',  PE.FORM)) 


lat  MIHE.PE(3,1) 
lat  HIHE.PE(3,2> 
lat  NIHB.PE(3,3) 
lat  MIHR.PE(3,4) 
lat  KIllB.fE<3,3) 


-  ddval. a(df laid. £( 'FIVE. ONE',  PE.FORM)) 

-  ddval. a(d£laU.£('FIVE. TWO',  PE.FORM)) 

-  ddval. a(d£lald.£('FIVE. THREE',  PE.FORM)) 

-  ddval. a(d£lald.£('FIVE. POUR',  PE.FORM)) 

-  ddval. a(d£lald.£<'PIVE. FIVE',  PE.FORM)) 


andlf 


1£  FIELD. ID  -  'RETURN. TO. WOATA' 
go  to  'MASTER' 
andlf 


eaaa  'OVERMATCH. DATA' 

SO  to  'MASTER' 

"display  ovatwateh.data  Input  fan 
east  'OUTPUT. OPTIONS' 
go  to  'I64STSR' 

' '  display  output  options  Input  fon 


* 
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373 

374 

375  cas*  'START. MODEL' 

376 

377 

378  andsalact  "f laid. id. 2 

379 

380 

381  show  INPUT. FORM  with  'Input. fim' 

382 

383  lat  ddvtl. aCdflsld.f ('MINEFIELD. DEPIB*,  INPUT. FORM))  -  25.0 

384  1st  ddval.a(dflald.f('CP. INTERVAL',  INPUT. FORM))  •  20.0 

385  lat  ddval.aCdflald. {('DISTANCE'.  INPUT. FORM))  >  160.0 

386  lat  ddval.a(dflald. {('INTERVAL',  INPUT. FORM))  >  30.0 

387  lat  ddval.a(d{lald.{('E. SPEED',  INPUT. FORM))  -  8.0 

388  1st  ddval.a(d{lald.{('GRAPB.aH'.  INPUT. FORM))  -  1 

389  lat  ddval.a(d{lald. {('NUMBER. OF. RUNS'.  INPUT. FORM))  -  1 

390  lat  ddval.a(d{lsld. {('PLOW. INTERVAL'.  INPUT. FORM))  -  50.0 

391 

392  lat  FIELD. ID  •  aeespt. {(INPUT. FORM.O) 

393 

394  1st  CP. INTERVAL  -  ddval.a(d{lald. {('CP. INTERVAL',  INPUT. FORM)) 

395  1st  DISTANCE  «  ddval.a(d{lald. {('DISTANCE',  INPUT. FORM)) 

396  lat  INTERVAL  •  ddval.a(d{lald. {('INTERVAL',  INPUT. FORM)) 

397  1st  E. SPEED  -  ddval.a(d{lald.{('E. SPEED'.  INPUT. FORM)) 

398  lat  GRAPH. OH  -  ddval. a(d{lsld. {('GRAPH. OH',  INPUT. FORM)) 

399  1st  NUMBER. OP. RUNS  -  ddval. a(d{iald.{('RUMBER.OF. RUNS',  INPUT. FORM)) 

400  1st  MINEFIELD. DEPTH  -  ddval. a(d{iald.{('HINEFIELO. DEPTH',  INPUT. FORM)) 

401  1st  PLOW. INTERVAL  -  ddval. a(d{lald.{('PLCM.IHTEPVAL'.  INPUT. FORM)) 

402 

403 

404  NUM.ELEmHT  w  F.PLOHS  *  T. PLOWS  *  TRACKl  *  TRACK2  *  TRACK3 

405  NUH.MINB  •  P.MINES  *  I.MIHES  *  C.MINES  *  T. MINES  >  H. MIRES 

406 

407  NUM.C?  -  (DISTANCE  /  20.0)  *  1.0 

408 

409  tstusn 

410  and  "GET. DATA 
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1  cvant  GRAPHIC. UPDATE 

2 

3  "THIS  EVEMT  IS  USED  TO  UPDATE  THE  LOCATIOH  OF  THE  GRAPHIC  EHTITIES  ASD 
*  "AHY  SPECIFIC  HATE  --  CUHHEHTLY  HARD  CODED,  BUT  CA»  BE  MADE  INTO  A 
3  "USER  SELECTED  REFREASH  RATE 
6 

7  d«fln*  I  an  intagar  vatiabla 

8 

9  for  I  -  1  to  HUH. ELEMENT  do 

10  if  (SPEEO(E(I))  >  0) 

11  aehadula  a  graphic . updata  at  tlao.v  *  .023 

12  laava 

13  andlf 

14  loop 

15 

18  call  UPDATE. LOCATION 

17 

18  rotum 

19  and  "  GRAPHIC . UPDATE 
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routin*  INITIALIZE 

"THIS  ROUTINE  IS  USED  TO  CREATE  ALL  ELEMENTS.  IF  APPROPRIATE,  IT  CAUSES  A 
"MOVEMENT. PLAN  TO  BE  INDIVIDUALLY  CREATED  FOR  EACB  ONE.  REINITIALIZES  ALL 
"DATA  RUN  COUNTERS  AND  STARTS  THE  SIMULATION. 


1 

2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

>  13 

14 

13 

18 

•  17 

18 

19 

20 
21 
22 

23 

24 
23 
26 

27 

28 

29 

30 

31 

32 

33 

34 
33 

36 

37 

38 

39 

40 

41 

42 

43 

44 
43 
48 

47 

48 

49 

30 

31 

32 

33 

34 
33 

36 

37 
36 
39 
60 
61 
62 


dafln*  I  41  4n  Intcsaz  vazlabl* 
d4fln«  J  as  an  intsgaz  variabla 
daflns  DELAY  as  a  doubls  vaziabls 
dafina  PLGH. DELAY  as  a  doubla  variabla 
dafina  INCREMENT  as  a  taal  variabla 
daflna  COUNTERl  aa  an  Intasar  variabla 
dafina  COUNTER2  aa  an  Intagar  variabla 


NUM. OBSTACLE  •  HUM. ELEMENT 

raaarva  E  aa  NUM. ELEMENT 
rasarva  OB  aa  HUM. OBSTACLE 
raaarva  NO  as  HUM. RED. OVERMATCH 


' '  ussd  to  aeeurataly  run  through 
' ' sltoant  array 


rasarva  SCB.BVEHTS(*)  aa  HUM. ELEMENT 

raaarva  EVENT. LIST(*)  as  HUM. ELEMENT 

raaarva  BYPASS. HAP(*,*.*)  as  HUM. ELEMENT  by  4  by  3 

raaarva  MOVEMaiT. PLAN (*.*,*)  as  HUM. ELEMENT  by  NUM. CP  by  3 

raaarva  CP(*)  as  HUM. CP 

rasarva  TIME.OF.DEATBC*)  aa  HUM.ELEMENT 

raaarva  TIME. OF. COMPLETION  aa  HUM.ELEMENT 

"If  aultlpla  runs,  turn  off  graphics, 

' ' and  Inltlallsa  data  varlablss  aach  run 
If  (HUMBER. OF. RUNS  >  1) 

for  J  "  1  to  RUM. ELEMENT 
do 

TIia.aP.DEATH(J)  >  0 
TIME.OP.CaMPUTION(J)  •  0 
loop 

MIHE.KIIXS  «  0 
MlNE.KlU.l  -  0 
MINE. KILL. 2  •  0 
MINE. KILL. 3  ■  0 
MINE. KILL. 4  •  0 
MINE. KILL. 3  •  0 

MIHE.NOVED  •  0 

R.O.SaOTS  -  0 
R.O.KILL  •  0 

TOTAL. LOST  •  0 

LOSS.  RATE  •  0 

LOST.  TO. HINES. BTPASSINO  •  0 
LOST. to. POES. BTPAS8IN9  •  0 

tlas.v  •  0.0 

andlZ 

for  I  •  1  to  NUM.ELEICHT 
do 

erasto  a  ELEICNT  eallod  Ed) 
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63 

craat*  a  OBSTACLE  callad  OB(I> 

64 

loop 

63 

66 

for  I  •  1  to  HUM. RED. OVERMATCH 

67 

do 

66 

craata  a  RED. OVERMATCH  callad  RO(I) 

69 

loop 

70 

71 

IKCREMEHT  -  -10.0 

72 

73 

for  I  •  1  to  HUH. RED. OVERMATCH 

74 

do 

73 

76 

R.O.X(RO(I))  •  IHCRBtEHT 

77 

IRCRS1EHT  -  IHCREMEHT  *  10.0 

78 

R.O.STATUSCROd))  •  1 

79 

R.O.y(RO(I))  -  HUM. CP  *  CP.IHTERVAt 

80 

R.O.BETA(RO(l>)  -  R.O.BETA.l 

81 

R.O.RATE(RO(I))  -  R.O.RATE.l 

82 

R.O.TTPECIKXI))  -  1 

83 

R.O.HUH(RO(I))  -  I 

84 

loop 

83 

86 

COUHTERl  -  1 

67 

If  F.PLaMS  aa  0 

66 

89 

COUHTERl  -  1 

90 

COUMTER2  -  F.PLOMS 

91 

92 

for  I  -  COUHTERl  to  COUHTERR 

93 

do 

94 

"initiallia  full  plow  alaaanta 

93 

EUMEHT.HUM<B(I))  -  I 

96 

ELBCHT.TTPECEd))  -  1 

97 

FLOH.WIDTH(Bd))  -  FLOM.MIOTB.l 

96 

PLOH.EFFBCT(Ed))  -  FtOW.EFFECT.l 

99 

F.STAIUS(Ed))  -  1 

100 

101 

call  HAEE. ROUTE  6lvl<>6  I 

102 

"Inltlallsa  alcMot 

atart  point  location 

103 

"basad  on  aovaBoat  pin 

104 

ELB«T.X(Ed))  •  MOVEWRT.FLAHd.l.l) 

103 

ELBCHT.KEdl)  •  NOVBMDR.FLAHII.  1.2) 

106 

STATUSdd))  >  1 

107 

wnmKEd))  -  E.HIDTI.l 

106 

LEHOmCEd))  -  B.LSRini.l 

109 

XLIH.RADIUS(Ed))  «  a4rt.C((MIDTa(Ed) >  *  LEIISTB(Ed))>/Pl.c) 

110 

IRACK.MIDni(Bd))  -  E.TRACX.MIDTH.I 

' 

111 

loop 

lU 

aodlt 

113 

114 

113 

If  T.PLONB  no  0 

116 

OOURIRl  •  OOUHTIRI  *  C0URTER2 

117 

C0UHR2  a  OOUHTERX  *  T.PLCNS 

116 

116 

for  I  •  OOUHTIRI  to  OOURTBU 

120 

do 

121 

"ialtlaUta  track  ploo  alaaanta 

122 

ELBBR.IRM(ld))  -  1 

123 

ELBOT.ITPKBd))  -  2 

124 

PLOH.imn  •  PiaH.HIOTR.X 

122 
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125 

PLOW. EFFECT  -  PLOW . EFFECT . 2 

126 

127 

call  MAKE. ROUTE  tivinc  I 

128 

initlaliz*  start  point  location 

129 

baaad  on  movamant  plan 

130 

ELEMENT. X(E(I))  >  MOVEMENT.  PLAN  (1, 1, 1) 

131 

ELEMENT. T(E(I))  -  MOVEMENT.  PLAN  (1, 1.2) 

132 

STATUS(E(I))  >  1 

133 

WIDTB(E(I))  -  E. WIDTH. 2 

134 

LEN6TH(E(I))  -  E. LENGTH. 2 

135 

ELEM.RA0IU8(E(I))  •  sqtt.£((WIDTH(E(I)) 

*  LEHGTH(Ed)))/Pl.c) 

136 

TRACK. WIDTH(E(I))  -  E. TRACK. WIDTH. 2 

137 

loop 

138 

andif 

139 

140 

IT  TRACKl  no  0 

141 

142 

COUHTERl  -  COUNTERl  >  COUHTER2 

143 

C0UNTER2  •  COUNTER2  *  TRACKl 

144 

145 

tor  I  •  COUHTERl  to  COUNTER2 

146 

do 

147 

' ' inltlallia  track  typo  1  alaoMnta 

146 

ELEMERT.HUH(E(I))  -  I 

149 

ELEMENT. TY?E(E(I))  -  3 

150 

call  HAKE. ROUTE  glvina  I 

151 

"Inltlaliaa  altnont  atart  point  location 

152 

"baaad  on  anvaiaant  plan 

153 

ELEMENT. X(E(I))  -  MOVEMENT. FLAN( I, 1, 1) 

154 

ELEMENT. y (Ed))  -  MOVEtCNT.PLANd.  1,2) 

155 

STATUSCEd))  >  1 

156 

HIDTH(Bd))  -  E. WIDTH. 3 

157 

LEMGTSdd))  -  S.LZN6TB.3 

156 

ELEM.RADIUSCEd))  -  a<ixt.t(<WIDTB(Ed)) 

*  LENGTB(Ed)))/Pl.e) 

159 

TRACK. WIOTH(Ed))  -  B. TRACK. WIDTH. 3 

160 

loop 

161 

andif 

162 

163 

If  TRACK2  na  0 

164 

165 

COUNTERl  •  OOUNTERl  *  COUNTERE 

166 

C0UNTER2  -  OOUNTBR2  *  TRACK2 

167 

166 

for  I  -  (SURTERl  to  OOORTEX2 

169 

do 

170 

' '  Inltlaliaa  track  typo  2  alcMnta 

171 

ELEICHT.HUM(Bd))  >  I 

172 

ELEMENT. TTFECBd))  •  4 

173 

call  MAKE. ROUTE  glvioN  I 

174 

"Inltlaliaa  al 

caMnt  atart  point  location 

175 

"baaad  on  nova 

■ant  plan 

176 

EIMNT.XCEd)}  •  NOVBSHT.FLANd.l.l) 

177 

ELEMNT.KEd))  -  HOVEICNT.FLANd.l.Z) 

176 

STAIUS(Ed))  -  1 

179 

HIOIH(Bd))  -  E. WIDTH. 4 

160 

LBHeni(Ed))  -  E. LENGTH. 4 

161 

ELOt.HADIUSCEd))  •  a<|rt.t((WIDTR(Ed)) 

•  LENGTH(Ed)))/Pl.c) 

162 

IRACK.HIOTH(Ed))  •  E. TRACK. WIDTH. 4 

183 

loop 

164 

andif 

165 

186 

If  TRACKS  no  0 
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187 

188 

COORTERl  -  COUHTERl  +  COUMTER2 

189 

COUMTER2  •>  COUNTER2  +  TRACK3 

190 

191 

for  I  -  COUHTERl  to  COUHTER2 

192 

do 

193 

' '  Inltlalli*  track  typa  3  alaiaanta 

194 

EUMEin.HUH(E(I))  -  I 

193 

ELEMEHT.IYPEfEd))  -  3 

196 

call  MAKE. ROUTE  glvlnc  I 

197 

198 

' ' tnltlallza  alaaant 

atart  point  location 

199 

"basad  on  onviaiant  plan 

200 

ELEMEHT.X(E(1))  -  MOVEMEXT.FLAH(I.l.l) 

201 

EUHBHT.y(E(I))  -  M0VEMEHT.PLAH(I.1.2) 

202 

STATUS(E(I))  -  1 

203 

HIDTB(E(I))  -  E.WIDTB.3 

204 

LEHGTBCEd))  -  E.LEM6TB.3 

203 

ELEM.RADIUS(Ed))  -  i<irt. f(<WIDTH(Ed> >  •  LEHGTH(Ed>)>/Pi.e) 

206 

TRACK.HIOTB(Ed))  -  E. TRACK. WIDTH. 3 

207 

loop 

208 

andlf 

209 

210 

call  MAXE.HIHEFIEU) 

211 

212 

for  1  •  1  to  F. PLOWS 

213 

do 

214 

DELAY  -  IIITERVAL/(E. SPEED  *  (1000.0/60.0)) 

213 

DEUY  -  d  -  1)  *  OEUY 

216 

tehadula  a  START  (Ivlng  I  at  (tiM.v  4  DELAY) 

217 

loop 

216 

219 

PLOW. DELAY  -  PLOW. INTERVAL  /  (E.SREED  •  (1000.0  / 

60.0)) 

220 

221 

tor  I  -  (P. PLOWS  4  1)  to  HOM.ELEtOHT 

222 

do 

223 

"coaputa  ttaa  it  will  taka  for  alaaanta  to 

224 

"covar  Intarval  dlatanca 

at  Rivan  ipood 

223 

DELAY  •  INTERVAL  /  (B. SPEED  •  (1000.0  /  60.0)) 

226 

"coDvart  dalajr  Into  actual  dalap  baaad  on 

227 

"poaltion  in  lino  of  vabicloa 

228 

DELAY  -  PLOW. DELAY  4  (d  -  1)  •  DELAY) 

229 

230 

aehodula  a  START  I  at  (tiao.v  4  DELAY) 

231 

loop 

232 

233 

tor  I  -  1  to  NUM.RED. OVERMATCH 

234 

do 

233 

eaU  R. DIRECT. OVERMATCH  sivins  I 

236 

loop 

237 

236 

if  ORUPH.aH  •  1 

230 

aehadula  a  ORAPHIC. UPDATE  at  (tiM.v  4  .03) 

240 

aodif 

241 

242 

atart  aiaulatioo 

243 

rotun 

244 

and  "INITIALIEH 
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1  routin*  MAKE. BEX  sivtn  E.ID.  O.ID 

2 

3  "GIVEN  AH  ELEMENT  ID  AND  AH  OBSTACLE  ID.  THIS  ROUTINE  CALCULATES  AND  STORES 

4  "the  C0(»DINATES  and  equations  for  an  EQUALATERAL  HEXAGON  TO  BE  USED  AS 
3  "THE  CENTERLINE  OF  THE  ELOIENTS  BYPASS  PATH  AROUND  THE  OBSTACLE 

6 

7  define  E.ID  ee  en  Inteser  varieble 
B  define  O.ID  es  en  Integer  vcrieble 
9  define  O.X  ee  a  real  varlabla 

10  daflna  O.Y  aa  a  raal  varlabla 

11  daflna  0. RADIUS  aa  a  raal  varlabla 

12  daflna  E. RADIUS  aa  a  raal  varlabla 

13  define  RADIUS  aa  a  raal  variable 

14  define  COEFl  as  a  raal  varlabla 
13  daflna  COEF2  aa  a  raal  varlabla 
16 

17  O.X  -  OBSTACLE. X(0B(0. 10)1 
16  O.Y  •  OBSTACLE. Y(0B(0. ID)) 

19  0. RADIUS  -  0BS.RADIUS(0B(0.I0)) 

20 

21  E. RADIUS  -  ELIM.RADIUS(E(E.ID)) 

22 

23  RADIUS  •  0. RADIUS  *  E. RADIUS 

24 

23  '  coaffaelanta  datlvad  froa  30-60-90  dagraa  trlangla 

26  COEFl  -  (1.0/aqrt. 2(3.0))  •  RADIUS 

27  COBP2  -  <2.0/aqrt.t(3.0))  *  RADIUS 
2g 

29  PT1.X(0B(0.ID))  •  O.X 

30  PT1.Y<0B(0.ID))  -  O.Y  -  COEF2 

31  PI2.X(0B(0.I0))  -  O.X  ♦  RADIUS 

32  PI2.Y<0B<0.ID))  -  O.Y  -  COEPl 

33  PT3.X(0B(0.ID))  -  O.X  ♦  RADIUS 

34  PT3.Y(OB(0.I0))  -  O.Y  ♦  COai 

33  PT4.X(OB(0.ID))  -  O.X 

36  PT4.Y(OB(O.IO))  •  O.Y  4-  0002 

37  PT3.X(0B(0.ID))  •  O.X  -  RADIUS 

36  PT3.y(0B(0.ID))  •  O.Y  a  COEFl 

39  PTe.X(OB(O.IO))  •  O.X  •  RADIUS 

40  PT6.Y(O8(O.I0))  •  O.Y  -  COEFl 

41 

42  SLOPE. A(OB(0. ID))  -  (PT2.Y(0B(0.ID))  -  PT1.T(0B(0. ID) ) )  / 

43  (PT2.X(0S(0.ID))  -  PT1.X(0B(0.ID))) 

44 

43  SLOPE. F (OS (O.ID))  -  (FTl. 1(00(0. ID))  -  PTS.Y((»(O.ID)))  / 

46  (PTl.X(Oi(O.IO))  -  PT6.X(00(O.ID)>) 

47 

48  SLOPE. C(0S(0. ID))  •  (PT3.Y(0B(0.I0))  -  PT4 .Y((»(0. ID) ) )  / 

49  (PT3.X((»(O.ID))  -  PT4.X((a(0.ID))) 

50 

31  SLOPE. D((»(0. ID))  •  (PT4.T(OE(O.ID))  -  PTS.T((»(0. ID) ) )  / 

32  (PT4.X((»(0.1D))  -  PTS.X(OB(O.ID))) 

S3 

34 

33 

36  T.Iin.A(G0(0.ID))  «  PTl.T(Oi(O.ID))  -  SLOPE. A(OB(0. ID))  *  PT1.X(OB(O.ID)) 

37  r.Iirt.F(00(0.ID))  -  PTl. 1(00(0. ID))  -  SLOPE. F (00 (O.ID))  •  PT1.X(0B(0.ID)) 

35  y.Iin. 0(00(0. ID))  -  PT4.T(00(O.ID))  -  SLOFE.C(I»(O.ID))  *  PI4.X(0B(0.ID)) 

39  r.IIIT.D(00(O.IO))  •  PT4.r(0B(0.ID))  -  SLOPE. D(0B(0. ID))  •  PT4.X((»(0.ID)) 

BO 

61 

62  ratum 


J 
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63 

64  md  "MAKE. HEX 
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1  toutin*  HAKE.MIMEFIELO 

2 

3  "ROUTINE  TO  GENERATE  RANDOH.  UNIFORM  DENSITY  MINEFIELD 

4 

5  dafln*  I  aa  an  Intagar  variabla 

6  daflna  X,  Y  as  taal  variablas 

7  daflna  DEPTH  as  a  raal  variabla 

8  daflna  MF.VnOTB  aa  a  raal  variabla 

9  daflna  MF. DEPTH  aa  a  raal  variabla 

10  daflna  MF.Y  aa  a  raal  variabla 

11  daflna  HF.B,  MF.T  as  raal  variablas 

12  daflna  AREA  as  a  raal  variabla 

13  daflna  WIDTH  as  a  raal  variabla 

14 

15  rasarva  M  aa  HUM. MINE 

18  "dapth  of  display 

17  DEPTH  •  HUM. CP  •  CP.IHTERVAL 

18  "eantar  tha  scraan 

19  MF. WIDTH  -  DEPTH/2.0 

20 

21  "eantar  tha  Dinas  on  scraan 

22  MF. DEPTH  -  MIHEFIELO . DEPTH  /  2.0 

23 

24  MF.Y  -  .3  *  DEPTH 

23  MF.B  -  MF.Y  -  MF. DEPTH 
28  MF.T  •  MF.Y  *  MF. DEPTH 

27  AREA  -  (2.0  *  MF. WIDTH)  *  (2.0  *  MF. DEPTH) 

28  WIDTH  •  2.0  •  MF. WIDTH 

29 

30  AREA.DEHSITY  •  HUM. MIHE/ AREA 

31  AREA. DENSITY. TYPE. 1  •  P.MIHES/AREA 

32  AREA. DENSITY. TYPE. 2  -  I.HINBS/AREA 

33  AREA. DENSITY. TYPE. 3  •  C.HIHES/AREA 

34  AREA. DENSITY. TYPE. 4  •  T.MIHES/AREA 
33  AREA.DEHSITY.TYPE.S  -  W.MINES/AREA 

36 

37  LINEAR. DENSITY  «  HUM.HIHE/WIDTH 

36  LINEAR. DENSITY. TYPE. 1  -  P.MINES/WIDTH 

39  LINEAR. DENSITY. TYPE. 2  >  I.HIHES/WIDTB 

40  LIHEAR.DENSITY.TyFE.3  •  C.MIHES/WIDTB 

41  LINEAR. DENSITY. TYPE. 4  -  T.MIHES/WIDTH 

42  LINEAR. DENSITY. TYPE. 3  •  W.MIHES/WIDTB 

43 

44  If  F. MINES  na  0  _ 

43  for  I  -  1  to  P. MINES 

46  do 

47 

46  eraata  MINE  eallad  M(I) 

49  HIRE.HUM(M(I))  •  I 

50  X  -  UNIFORM. F(-I«.WIDTH,IV.WIDTB.2) 

31  HIRB.X(M(I))  •  X 

32  Y  «  UNIF0NN.F(»».a.  tV.T.  2) 

33  HINB.Y(H(I))  -  Y 

34  BA0IU8(H(I))  -  P. RADIUS 

33  NINB.TYPE(N(I))  •  1 

36  MINE.STAIUS(H(1))  •  1 

37  If  OMPN-QH  -  1 

36  show  M(I)  with  'nslna.len' 

39  lat  location. a (M(I))  •  location. f(X,Y) 

60  display  H(I)  with  'calna.len' 

61  andlf 

62  loop 
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63  andif 

64 

63  It  I. MIMES  n*  0 

66  tot  I  -  P. MIMES  to  (P. MIMES  +  I. MIMES) 

67  do 

68 

89  CEOoto  MIME  eallod  M(I) 

70  MIHE.MUKMd)]  -  I 

71  X  -  0MIFCIBM.F(-MF.WIDTH,MF.WIDTH.3) 

72  MIME.XCMd))  -  X 

73  Y  -  UMlFOBM.P(MF.B,MF.t,  3) 

74  MIME.Y(Md))  -  Y 

73  RADIUS<Md))  -  I. RADIUS 

76  MIHE.TYPE(Md))  -  2 

77  MIME.STATUS(Md))  -  1 

78  It  GRAPB.OH  -  1 

79  (how  Nd)  with  'bholno.lcn' 

80  lot  location. a(Md))  •  location. t(X,Y> 

81  dlaploy  MCI)  with  ‘'bbolna . Icn' 

82  andlt 

83  loop 

84  andlt 
83 

88  It  C. HIRES  na  0 

87  tor  I  -  (P. MIRES  *  I.MIRES)  to  (P.HIRES  *  I. HIRES  * 

88  do 

89 

90  craata  HIIIE  callod  Md) 

91  HIME.inM(Md))  -  I 

92  X  -  URirClllM.P(-(r.HI0TH,W.H10TB,3) 

93  MlHB.X(Hd))  •  X 

94  Y  -  ORIfORM.PCMr.B,  MF.t,  3) 

93  MIRB.Y(Md))  >  Y 

96  RADIUS(Md))  -  C.RADIU8 

97  HIHE.TYPB(Md))  •  3 

98  MIHB.SIATU8(Md))  •  1 

99  It  ORAPB.OR  •>  1 

100  ahow  Hd)  with  'htalna.len' 

101  lot  location. a(Md))  •  location. f(X,Y) 

102  dlaploy  Md)  with  *l9lBlno . icn' 

103  andlt 

104  loop 
103  andlt 
108 

107  It  T. MIRES  no  0 

108  tor  I  -  (P.MIRB8  *  I. MIRES  +  C.MIMES)  to 

109  (P.MIRES  I.MIRES  *  C. MIRES  *  T.MIRES) 

110  do 

111 

112  erooto  MIRE  oallad  Md) 

113  MIRE.ROH(Md))  •  I 

114  X  >  tlRIP«RM.F(-W.MIDTB,(*.HIDT8.3) 

113  MIHB.X(Md)}  -  X 

lie  y  -  oRiicRM.pnv.B,  iv.t,  3) 

117  MXRE.Y(Nd))  -  Y 

118  RADimCMd))  -  T. RADIOS 

119  MinX.TYPE(M<X))  •  4 

120  MIRX.STAZUSlHd))  -  1 

121  If  OMPR.aH  •  1 

122  ahow  Md)  with  'blalna.ion' 

123  lot  loeatlaa.a(M(I})  •  leeatlao.ftX.Y) 

124  dlaploy  Nd)  with  *11111008.100' 


a 


C.MXHSS) 
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123  andlf 

126  loop 

127  ondlf 
126 

129  If  W. MINES  no  0 

130  for  I  -  (P. MINES  +  I. MINES  +  C. MINES  +  T. MINES)  to 

131  (P. MINES  >  I. MINES  +  C. MINES  T. MINES  W. MINES) 

132  do 

133 

134  eroato  MINE  eollod  M(I) 

133  MINE.NUM(M(I))  -  I 

136  X  -  UNIFailM.F(-MF.MIDTB,(ff.HIDTB,3) 

137  HINE.X(M(I})  -  X 

138  T  -  UNiraiM.F(MF.B.  MF.T,  3) 

139  MINE.TCMd))  -  T 

140  RADIUSCMd))  •  W. RADIUS 

141  MlRE.TyPE(Md))  -  3 

142  MINE.STATUS(Md))  •  1 

143  If  GRAPH. ON  -  1 

144  ohoir  Md)  with  *lilaino.leB* 

143  lot  location. •(Hd))  -  location. f(X,T) 

146  diaplair  Md)  with  'blaUna.icn" 

147  andif 

148  loop 

149  andif 

130 

131  ratum 

132 

133  and  "MAKE. MINEFIELD 
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1 

toutlna  MAKE. ROUTE  (Ivan  I 

3 

' '  THIS  ROUTINE  IS  DESIGNED  TO  GENERATE  A  ROUTE  FOR  A  GIVEN  ELEMENT . 

4 

"  IF  THE  ELEMENT  IS  OF  TYPE  1  (FULL  PLCM) ,  NO  DEVIATION  IS  CALCULATED 

5 

6 

"IN  THE  X  DIMENSION  OF  THE  CHECKPOINTS. 

7 

8 

da£ln*  I  an  Intagar  vatlabla  "idantlfiaa  alamant 

g 

daflna  J  aa  an  Intagar  varlabla  ' ' idantlfiaa  chackpoint 

10 

dafina  K  aa  an  intagar  varlabla 

11 

dafina  L  aa  an  intagar  varlabla 

12 

daflna  DIVIS(Xl  aa  a  raal  varlabla 

13 

dafina  (HIR.y.LOC  aa  a  raal  varlabla 

14 

P 

IS 

18 

CUR. Y. LOG  •  0.0  "raaat  chackpoint  y  location  cotmtar 

17 

18 

for  L  ••  1  to  RUM. CP  "and  than  for  aach  chackpoint 

ig 

do 

20 

21 

' ' a  navigation  arror  In  tha  z  dlnansion 

22 

aalact  eaaa  ELEMENT.  TYPE  (Ed)) 

23 

24 

eaaa  1 

2S 

HOVBCNT.PLANd.L.l)  -  N0RMAL.F(0.0.  NAV.ERR.l,  3) 

28 

eaaa  2 

27 

MOVBONT.PLANd.L.l)  •  inHMl.F(0.0,  HAV.ERX.2,  3) 

28 

eaaa  3 

20 

MOVEMENT. PLANd.L.l)  -  HCSHAL.FCO.O,  NAV.ERR.3,  3) 

30 

eaaa  4 

31 

(OVEMEHT.FLAHd.L.l)  •  NCBMAL.F(0.0,  HAV.ERR.4,  3) 

32 

eaaa  3 

33 

MOVBONT.PLANd.L.l)  •  IIOilMAL.F(0.0.  HAV.ERR.S,  3) 

34 

default 

33 

print  1  llna  thua 

WWffERRMl  —  invalid  typo  In  Inltializa 

37 

andaalact 

38 

38 

"firat  olaaont  haa  no  navigation  arror 

40 

if  (I  -  1) 

41 

NOVaONT. PLANd.L.l)  •  0 

42 

andlf 

43 

"and  aaalgn  a  y  location  baaod  on  checkpoint 

44 

"aaquanea  and  Intarval 

43 

M0VBCNT.FLARd,L,2)  •  CUR.Y.LOC 

46 

CF(L)  •  CUR.Y.LOC 

47 

"and  inezaaant  checkpoint  y- location  counter 

48 

CUR.Y.LOC  -  CUR.Y.LOC  *  20.0 

49 

30 

loop 

31 

32 

J  •  NUH.CF  -  1 

S3 

34 

MOVBOHT.FlANd.l.S)  -  1 

33 

36 

for  K  •  1  to  J  "for  aach  chackpoint,  except  tha  laat 

• 

37 

38 

do 

30 

"ealeulato  dlvtaor  of  alopo  equation 

60 

Dmaa  •  HOVBOIIT.FLARd.KM.l)  -  MOVBORT.PLANd.K.l) 

61 

62 

"It  lino  not  horizontal,  (inflnlta  alopo) 
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63 

"calculato  alopa  of  Una  connacting  checkpoint 

64 

"with  NEXT  checkpoint  and  store  result 

63 

"in  array 

66 

If  DIVISOR  n*  0 

67 

MOVEMENT. PLAN ( I, K. 3)  • 

68 

(MOVEMENT. PLAN ( I. K+1. 2)  - 

'  MOVEMENT. PLANd.K, 2))  /  DIVISOR 

69 

70 

"otharwisa,  approzlsiata  Infinite  slope 

71 

72 

MOVEMENT. PLANd.K, 3)  -  1000000 

73 

•ndlf 

74 

73 

"ealculata  y-intercept  of  Una  eonnacting 

76 

"cuxsant  checkpoint  with  NEXT  checkpoint 

77 

"and  store  result  in  array 

78 

MOVEMENT. PLANd.K, 4)  • 

79 

MOVEMENT.  PLANd  .K.  2) 

•  (MOVEMENT. PLANd.K. 3)  • 

80 

MOVEMENT. PLANd.K,  1)) 

81 

82 

loop 

83 

84 

roturn 

83 

86 

•nd  "MAKE. ROUTE 
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1  routln*  MIHE.DUHF 

2 

3  ' '  IBIS  ROUTINE  DUMPS  OUT  ALL  MINE  DATA  ASSOCIATED  WITH  A  PARTICULAR  ITERATION 

4  "IT  SHOULD  HOT  BE  USED  F(»  MULTIPLE  ITERATIONS  AS  THE  OUTPUT  FILE  HILL 
3  "BECOME  EXTREMELY  LARGE  VERY  FAST. 

6 

7 

8  print  3  llnaa  thus 

DUMP  OP  MINE  DATA  « 

12 

13  print  3  Linas  thus 
MINE  DATA 

n>aa  z  y  status  radius  typs 


17  for  I  -  1  to  HUM. MINE 

18  print  1  lino  with  1,  MINE.XCMCD),  MIHE.YCMd)),  MIHE.STATUSCMCD), 

19  RA0IU8(M(I)),  MlNE.TYPECMd))  thus 

****  *««  ^  ***  ***  ^  ***  **  ** , **  ** 

21  start  now  output  Lins 

22 

23  print  4  linos  thus 

Mins  vs  Vahids  Pk  Valuaa 
Mins  Typo 

Vsh  Typs\  1  2  3  4  3 


28 

29  for  J  -  1  to  3 

30  do 

31  print  1  Lina  with  J,  HIHE.PKd.J),  MIHE.PK(2,J),  HIHE.PKO. J), 

32  MINE. PE( 4,3),  and  MINE. PK(S,J)  thus 

r*s  a  ^  so  a ,  aa  a ,  aa  * .  **  a .  *s 

34  loop 

33 

36  rstum 

37 

38  and  "MINE. DUMP 
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1  event  MINE.ENCCRmTER  liven  EUMEHT.ID,  MINE. ID 

2 

3  ' '  THIS  EVENT  RESOLVES  AN  ENCOUNTER  BETWEEN  THE  VEHICLE  IDENTIFIED  BY 

4  "ELEMENT.  ID  AND  THE  MINE  IDENTIFIED  BY  MINE.  ID 

5 


6 

define  ELEMENT. ID  ee  an  integer  variable  "element  in  question 

7 

define  MINE. ID  at  an  integer  variable  "mine  in  queation 

8 

define  FK  aa  a  real  variable 

"prob.  of  mine  killing  element 

9 

define  I  as  an  integer  variable 

"same  aa  elamant.id 

10 

define  J  aa  an  integer  variable 

"tama  as  mine. id 

11 

define  K  aa  en  integer  variable 

' ' alamant  type 

12 

define  L  as  an  integer  varieble 

"mine  type 

13 

define  X.Y  at  real  variablaa 

' ' location  variables  for  graphics 

14 

define  ROLL  as  a  real  variable 

' '  random  draw 

15 

define  ROLL2  aa  a  real  variable 

16 

define  E.X  and  E.Y  at  real  variables  "alamant  x  and  y  (canter  front) 

17 

18 

call  UPDATE. LOCATION 

19 

20 

I  -  ELEMENT. ID 

21 

J  -  MINE. ID 

22 

K  -  ELEMENT. TYPE(E(I)) 

23 

L  -  MINE.TYPE(M(J)) 

24 

23 

SCB.EVENTS(I)  -  0 

28 

EVENT. LIST(I)  -  0 

27 

28 

PE  >  0 

29 

' 

'if  ad.na  is  active,  lookup  appropriate  Fk 

30 

if  MIRE.STATUS(H(J))  na  0 

31 

PE  •>  MINE.PE(L.E) 

32 

endlf 

33 

A 

'random  niaabar  determination 

34 

ROLL  •  uniform. f(0. 0,1. 0,3) 

39 

801X2  •  uniform. f(0. 0,1. 0,6) 

36 

A 

'it  full  plow  versus  non-contact  mina 

37 

"detanBlna  if  plow  eatebea  mine,  if  yes 

38 

A 

'call  full. plow  to  move  mina 

39 

if  <ELEWNT.TYFE(E(I))  •  1)  and 

(MINB.IYFE(M(J))  ne  3) 

40 

if  ROLL2  <  PLOH.EFTBCT(E(I)) 

41 

call  rUIX.FLOM  giving  I.J 

42 

A 

'increment  global  MIRE. MOVED  counter 

43 

HIRE. MOVED  -  MINE. MOVED  *  1 

44 

A 

'mine  moved,  so  skip  remainder  of  routine 

43 

go  to  'FLOWED' 

46 

andif 

47 

andif 

48 

'determine  if  mina  destroys  element,  if  so 

49 

A 

'update  mina  counters,  alamant  status, 

30 

A 

' element  spaed  and  record  time  of  death 

31 

if  ROLL  la  FE 

32 

33 

MINE.EILLS  -  NINE.EILLS  *  1.0 

34 

TOTAL. LOST  •  TOTAL. LOST  >  1.0 

39 

TIME. or. DEATH! I)  -  tima.v 

36 

97 

if  STATQ8(E(I))  •  2 

38 

LOST. TO. HIRES. BTFASSING  -  LOST.IO.MINES.BTFASSINS  *  1 

39 

andif 

60 

61 

saleet  ease  HIHE.TTFB(H(J)) 

62 

eaaa  1  "praasora  mine 
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83  MIIIE.KIU.I  •  HI1IE.EIU..1  *  1.0 

64  eas*  2  ' ' inf luanea  alna 

65  MIME. KILL. 2  -  MIME. KILL. 2  *  1.0 

66  caaa  3  "contact  ailna 

67  MIME. KILL. 3  >  MIME. KILL. 3  *  1.0 

68  caaa  4  "ailna  typa  4 

69  MINE. KILL. 4  -  MIME. KILL. 4  4-  1.0 

70  caaa  3  "Blna  typa  3 

71  H1HE.K1U.3  -  MINE. KILL. 3  *  1.0 

72  dafault 

73  print  1  llna  thua 

f##f#ERIl0R  —  invalid  Blna  typa  ancountarad 
73  andaalact 

76 

77  "If  eontaat  waa  wocklni  plow  va  contact  alna, 

78  "than  kill  racocda  axa  In  actor,  to  eorraet 

79  "  raduoa  plow  af f actlvanaaa ,  eorraet  Blna 

80  "eountar,  cauaualty  eountac,  tlaa  of  daath 

81  "raeord  and  aklp  raaalndar  of  coutlna 

82  If  (ELEMEHT.TYPE(E(1))  -  1)  and  (HIRE.TYPE(M(J))  •  3)  and 

83  (P.STATUS(B(I))  na  0) 

64  PLOH.EFFBCKEd))  •  0 

83  F.STATUS(E(I})  >  0 

86  M1MB.STAIUS(M(J))  -  0 

87  MINE. KILL. 3  -  MINE. KILL. 3  -  1.0 

88  MINE. KILLS  -  MIHB.KILLS  •  1.0 

89  TOTAL. LOST  -  TOTAL. LOST  -  1.0 

90  If  STATUS(B(I))  -  2 

91  LOST.TO.MINE.BTFASSIIIO  -  LOST. TO. MIME. BTPASSINS  •  1 

92  andlf 

93 

94  TOC.CV.OEATBd)  -  0 
93 

96  If  oRAn.aii  -  1 

97  acaaa  M(J) 

98  ahow  M(J)  with  *blSBlna.len' 

98  s  -  MIHB.X(H(J)) 

100  y  -  HIHX.r(M(J)) 

101  lat  location. a(M(J))  >  location. f(X,Y) 

102  andlf 

103  so  to  'PLOMBD' 

104  andlf 
103 

106  X  -  BLMHT.X(Bd)) 

107  y  -  XLBWR.TlBd)) 

108  E.X  -  X 

109  B.T  -  Y 

110 

111  If  OMn.OII  -  1 

112  stow  OKI)  with  'otol.len' 

113  if  HJMDR.Tmdd))  -  1 

114  stow  Ed)  with  'dftiplow.len' 

113  also 

115  show  id)  with  'tank.len' 

117  aadif 

118  lat  location. a(OBd))  '  location. f(X.Y) 

119  lot  location. add))  •  looation.fd.Y) 

120  andif 

121  "i^dato  Bins  status 

122  MIin.STATDS(H(J))  -  0 

123  If  OMn.OII  -  1 

124  erase  M(J) 
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125  thow  M(J)  with  ‘’■laiDa.ien'’ 

126  z  -  MIHE.X(H(J)) 

127  y  -  MTI»E.Y(M(J)) 

126  let  location. -  location. £(X,Y) 

129  andlt 

130 

131  STATUSCEd))  -  0 

132  SPEED(E(I))  -  0 

133  OBSTACLE. X(OB(I))  -  E.X  "XI 

•  134  OBSTACLE. Y(OB(I))  -  E.Y  "Y1 

135  (ffiS.RADIUS(OB(I))  -  ELBI.RADIUSCBd)) 

136 

137  call  OBSTACLE. CQMSOLIDATIOH 

138  call  CALEHDAR. UPDATE 

139 

140  alaa 

141 

142  MIIIE.STATUS(M(J))  -  0 

143  If  GRAPH. OH  -  1 

144  arasa  H(J) 

145  shoo  H(J)  «>lth  'smlna.lcn' 

146  z  -  HI1IE.X(M(J>) 

147  7  -  MIBB.Y(H<J)) 

148  lat  location. a(H(J))  -  location. f(X.Y) 

149  andif 

150 

151  '  PLOWED' 

152  call  MEXT.EMCOUIITEX  slvlnc  I 

153  andif 

154 

155  latujtn 

156 

157  and  "tCKE.EHCOUHTa  adltad  31  Au«uat  1991 
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1 

2 

3 

4 

5 
8 

7 

8 
9 

10 

11 

12 

13 

14 
13 
16 

17 

18 

19 

20 
21 
22 

23 

24 
23 
26 
27 
26 

29 

30 

31 

32 

33 

34 
33 

36 

37 

38 

39 

40 

41 

42 

43 

44 
43 

46 

47 

48 

49 

30 

31 

32 

33 

34 
33 

36 

37 

38 

39 
60 
61 
62 


•vant  HEW. CP  (Ivan  ID 

' '  THE  EVEHT  CHANGES  THE  MOVEMENT  PATH  USED  BY  THE  MOVING  ELEMENT  BASED 
"UPON  IIS  PROGBESS  lAM  THE  PREPARED  MOVEMENT  PLAN. 

daflna  ID  aa  an  Intagar  varlabla 
dafina  CP. ID  aa  an  intagar  varlabla 

call  UPDATE. LOCATION 

SCH.EVENTSdO)  -  0 
EVEHT. LIST (ID)  -  0 

call  PIHD. CURRENT. CP  giving  ID  ylalding  CP. ID 

"alaaiant  la  in  normal  moda 

i£  STATUS(E(ID))  -  1 

if  CP.  ID  -4  1  -  HUM. CP  "  all  dona  moving 

if  SPEED(E(ID))  na  0,  "not  alraady  racordad  (thia  could  ba 
"a  ealandar  updata _ ) 

if  (TIME.OF.COMPLETIOH(ID)  -  0)  and  (TIME. OF. DEATH (ID)  -  0) 
TIMB.OF.COHFLETIOH(ID)  •  tima.v 
andif 
andif 

SPEED(E(ID))  «  0 
ratum 
andif 


"updata  ehaelipolnt  atatua  flaga 
MOVEMENT. PLAHdD.CP. ID, 3)  -  0 
MOVEMENT. PLAHdD.CP. ID  *  1,3)  •  1 

"updata  alamant  poaitlon  location 
EL2HENT.X(EdO))  •  MDVEICNr.flANdD.CP.ID  *  1,1) 

ELEWHT.y(EdO))  •  HOVEHDn.PLANdD.CP.ID  4-  1,2) 

andif 

"if  alamant  in  bypaaa  moda 

if  STAIUS(E(ID))  -  2, 

if  CF.IO  •  3  "and  raady  to  ra-antar  movamant  plan  from  bypaaa 

BLBCRT.X(B(IO))  •  BYPASS. HAPdD.4,1) 

EUMaiT.T(BdO))  -  BTFASS.MAP(IS,4,2) 

8TATUS(EdO))  •  1 

"eaaa  tihara  bypaaa  Ineluda  asit  laoundary 
if  ELMENT.KBdO))  •  CP(NOH.CP) 

SPBED(XdO))  •  0.0 

if  (TIH1.0F.(XMnjniaN(ID)  •  O)  and  (TIIC.(V.DEATH(ID)  •  0) 
TnC.OP.OCNPLXTICHdO)  -  tima.v 
andif 
andif 

tor  I  ■  1  to  HUM. CP  "araaa  etaaekpoint  atatua  Indicator  for  alamant 
do 

Ht7«B«BT.PLAH(IO,l,3)  -  0 
loop 


"datoimina  uhieh  ebaekpoint  «aa  ra-antarad  into 
"and  mark  that  ona  aa  tho  currant  ebaekpoint 

for  I  •  1  to  NDM.CP-1 
do 

it  ((CPd)  <  ELimT.KXdO)))  mad  (CP(Ial)  >  ELMNT.Y(t(ID)))) 
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63  MOVEMEMT.PLAHdD.l.S)  •  1 

64 

65  MOVEMEHT.PLAHdO.HWI  CP,5)  -  1 

66  andit 

67  loop 
66 

69  call  HEXT.EMCOUHTER  glvlns  ID 

70  rotuxn 

71  ondlt 

72 

73  EUHEHT.X(EdO))  -  BYPASS.MAPdO.CP.IIH’l.l) 

74  EUMEHT.y(EdD))  -  ByPASS.MAPdO,CP.ID4-1.2) 

75  BYPASS. MAPdD, CP. ID.  5)  •  0 

76  BYPASS.MAPdD.CP.IIH-l,  5)  •  1 

77  ondlt 
76 

79  call  HEXT.EMCOUHTER  glvlnc  ID 

80 

61  raturn 

62 

83  and  "HEM. CP  adltad  5  Sapt  91 
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1  loutlna  NEXT.EHCOUIITER  (Ivan  ID 

2 

3  "THIS  ROUTINE  DETERHIHES  THE  NEXT  ENCOUNTER  EVENT  FOR  ELEMENT  ID. 

4 

5  datlna  ID  at  an  intatar  vtrlabla 

6  dafina  MINE. ID  aa  an  Intacar  variabla 

7  datlna  CF. DISTANCE  aa  a  raal  variabla 


8  daflna  M. DISTANCE  aa  a  raal  variabla 

9  daflna  OBS. DISTANCE  aa  a  raal  variabla 

10  daflna  DURATION  aa  a  doubla  variabla 

11  daflna  SCB.TIME  aa  a  doubla  variabla 

12 

13  If  (STATUS(E(ID>)  na  0)  and  (SFEED<E(1D))  na  0) 

14 

15 

16  "###  ERROR  TRAP  --  alaulatlon  eurrantly  thould  not  run  lonsar  than 

17  "10  aloMlatad  nlnutaa  auuclaua.  Ihia  atataaiant  will  atop  tha  ondal  If 
IS  " alaailatlon  tlma  tz**tly  azeaad  thla  valua. 

19 

20  If  (tlM.v  >  2S.0O) 

21 

22  print  1  lina  thua 

run  ran  for  25.00  aln.  and  wat  atoppad 
24 

23  achadula  a  STOP. SIM  now 

28  andlf 

27 

28  "dataralna  nazt  aanuvar  avant 

29  "  for  aaeh  typo  of  avant 

30  call  DISTANCE. TO. CF  tlvlnt  ID  ylaldlnc  CF. DISTANCE,  XI.  X2 

31  call  DISTANCE. TO. MINE  Slvint  ID  ytaldlns  MINE. ID,  M.DISTANCE 

32  call  DISTANCE. TO. OBS  livlnc  ID  ylaldlnt  (»S. DISTANCE 

33 

34 

33  "achadula  tha  eloaaat  of  tha 

36  "posslbla  aaouvar  avanta 

37  If  CF. DISTANCE  <  Bin. f (M.DISTANCE,  OBS. DISTANCE) 

38 

39  "achadula  a  cp  ancountar 

40  call  DELTA. riw  tlviat  ID,  CP.OISTAHCE  ylaldlns  DURATION 

41  SCB.TM  -  tUw.v  *  DURATION 

42  achadula  a  NEH.CF  callad  SCB.EVENTS(ID)  glvlbs  ID  at  SCB.TDC 

43  EVENT.  LIST  (ID)  •  1  "updata  avant  leg.  Evant  log  la 

44  "array  to  track  naat  avant  of  aach 

43  "alaamt.  1  -  CF,  2  -  Hina,  3  •  OBS 

48 

47  andlf 

48 

49 

30  if  M.DISTANCE  <  nin.f(CF. DISTANCE.  OBS. DISTANCE) 

31  "achadula  tana  ancountar 

32  call  DRLTA.TlMi  giving  ID,  M.DISTANCE  yialding  DURATION 

S3  SCI. TO*  •  tlM.v  *  DURATION 

34  achadula  a  KtNE.ENOaOHTBR  callad  SCI. EVENTS (ID)  giving  ID, 

33  Mill. ID  at  SCl.TIM 

38  EVENT. LIST(IO)  •  2 

37 

38  andif 
38 

80  if  OSS. DISTANCE  <  nin.f (M.DISTANCE.  CF. DISTANCE) 

81  "achadula  obataela  ancountar 

82  call  MLTA.TIM  giving  ID,  OSS.DISTANCI  yialding  DURATION 
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63  SCB.TIME  -  tlOM.v  *  DURATION 

64  ichwiula  an  OBSTACLE. ENCOUNTER  callad  SCH. EVENTS (ID) 

63  glvlns  ID  at  SCH.TIHE 

66  EVENT.  LIST  (ID)  -  3 

67 

68  andl f 

69  andiC 

70 

71  ratutn 

72 

*  73  and  * ‘ NEXT . ENCOUNTER 
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1  routin*  OBSTACLE. CONSOLIDATION 

2 

3  "THIS  ROUTINE  IS  DESIGNED  TO  CONSOLIDATE  OBSTACLES  WHICH  ARE  TOO  CLOSE 
*  ' '  TOGETHER  TO  REASONABLY  PERMIT  MOVEMENT  BETWEEN  THEM  ( IN  THE  CASE  OF 

5  "VEHICLES  DISABLED  WHILE  BYPASSING)  C»  ARE  SO  CLOSE  TOGETHER  ON  THE  LANE 

6  "THAT  ATTEMPTING  TO  REGAIN  THE  LANE  WOULD  BE  SENSELESS.  THE  ROUTINE  WORKS 

7  "BY  CONDUCTING  A  PAIRWISE  COMPARISON  OF  ALL  OBSTACLES,  COMBINING  THOSE 

8  "WHICH  MEET  THE  ABOVE  MENTIONED  CONDITIONS.  IF  A  PAIR  OF  OBSTACLES  IS 

9  "COMBINED,  THEN  THE  ROUTINE  RESTARTS  FROM  THE  BEGINNING.  ONCE  A  PAIR  OF 

10  "OBSTACLES  HAS  BEEN  COMBINED.  THE  RESULTING  OBSTACLE  IS  LABELED  WITH  THE 

11  "LOWEST  HUMBER  BETWEEN  THE  TWO  AND  THE  2ND  NUMBERS  DATA  IS  ZERO' ED  OUT. 

12 

13  datlna  I,J  as  Intaiar  varlablss 

14  daflna  DISTANCE  aa  a  rsal  varlabls 

15  daflna  RADI  aa  a  rsal  varlabls 

16  daflna  XI,  Y1  aa  rsal  varlablsa 

17  daflna  RA02  aa  a  rsal  varlabls 

18  daflna  X2,  Y2  aa  rsal  varlablsa 

19  daflna  RAO  as  a  rsal  varlabls 

20  daflna  X,  Y  aa  rsal  varlablsa 

21  daflna  X.EDGE  and  Y.EOGE  as  rsal  varlablsa 

22 

23  '  RESTART' 

24  for  I  -  1  to  HUH.  OBSTACLE 

25  do 

26  "If  obatacla  szlsta,  raeord  naadsd  Info 

27  If  (OBSTACLE. ¥(OB(I))  >  0)  and  (OBS.RADIUS(OB(I) )  >  0) 

28  RADI  -  OBS.RADIUS(OB<I)> 

29  XI  -  OBSTACLE. X(OB(I)) 

30  ¥1  -  OBSTACLE. Y(OB(I)) 

31  "coopara  to  all  ranalnlni  obataelsa 

32  for  J  -  (1+1)  to  HUM. OBSTACLE 

33  do 

34  If  (OBSTACLE.  Y<OB<I))  >  0)  and  (OB3 .HADIUS(0B(  J) )  >  0) 

33  RA02  ••  0BS.RADIUS(0B(3)) 

36  X2  •  OBSTACLE. X(OB(J>) 

37  Y2  •  OBSTACLE. y(OB(J)> 

38  "cooputs  dlstancs  batwssn  obatacla  cantsra 

39  OISIAHCE  -  aqrt.f((Xl-X2)»*2  ♦  (Yl-Y2)»»2) 

40 

41  If  DISTANCE  <  2*(RAD1  *  RA02). 

42 

43  RAD  •  (DISTANCE  +  RADI  +  RAD2)/2.0 

44 

43  If  (XI  <  X2) 

46  X.EDGE  -  XI  -  RADI 

47  X  •  X.EDIS  +  RAD 

48  andlf 

49 

30  If  (X2  <•  XI) 

31  X.EDGE  •  X2  -  RAD2 

32  X  -  X.ED(«  ♦  rad 

33  andlf 

34 

33  If  (Yl  <  Y2) 

36  Y.EDCa  •  Yl  '  RADI 

37  Y  -  Y.EDGE  +  RAD 

38  andlf 

39 

60  If  (Y2  <-  Yl) 

61  Y.EDGE  -  Y2  -  RA02 

62  Y  -  Y.EOGE  *  RAD 
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63 

•ndlf 

64 

63 

OBSTACLE. X(OB(I))  - 

X 

66 

OBSTACLE. y(OB(I))  - 

y 

67 

OBS.RADIUS(OB(I))  • 

RAO 

68 

89 

' ' •liminat* 

2nd  obstacla  from  obatacla  list 

70 

OBSTACLE. X(OB(J))  - 

0.0 

71 

OBSTACLE. y(OB(J))  - 

0.0 

72 

OBS.RADIUS(OB(J))  • 

0.0 

73 

BO  to  'RESTART' 

74 

•ndlf 

73 

•ndlf 

76 

loop 

77 

•ndlf 

78 

loop 

79 

80 

raturn 

81 

82 

•nd  "OBSTACLE. CONSOLIDATION 
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1  mvmt  OBSTACLE. EHCOUMTER  Slvan  ID 

2 

3  "THIS  EVENT  CAUSES  THE  STATUS  OF  THE  ELEMENT  TO  CHANGE  TO  BYPASS  AND 

4  "TO  BEGIN  USING  THE  BYPASS  MAP  FOR  MOVEMENT 
3 

6  dafin*  ID  as  an  Intagar  varlabla 

7 

5  call  UPDATE. LOCATION 
9 

10  8CB. EVENTS (ID)  -  0 

11  EVENT. L1ST< ID)  -  0 

12  STATUS(E(I0))  "  2  "ehanga  alanant  status  to  'bypass' 

13 

14  BYPASS.  HAP  (ID,  1,  3)  “  1  "point  to  lat  chackpolnt  in  bypaas 
13  call  NEXT. ENCOUNTER  tiving  ID 

16 

17  raturn 

18 

19  and  "  OBSTACLE . ENCOUNTER 
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1  routin*  OUTPUT 

2 

3  ' ' THIS  ROUTIHE  CAUSES  THE  OITPUT  OF  THE  INPUT  VALUES  AHD  THE  SIBWART  DATA 

4  "  GENERATED  DURING  A  MODEL  RUN 

5 

6  print  3  line*  thui 

OUTPUT  DATA 

10 

11  print  2  llnaa  with  MINE. MOVED  thua 

FULL  WIDTH  PLOWS  aovad  mlnaa. 

14 

15  print  2  llnaa  thua 

MINE  EFFECTS 
IS 

19  print  6  llnaa  with  MINE. KILL. 1.  MINE. KILL. 2,  MIHE.K1LL.3,  MIHE.KILL.4, 

20  MINE.KIU.S,  MINE. KILLS  thua 

Typa  1  Bilnaa  had  *•*.**  kllla  (praaaura  alnaa) 

Typa  2  odnaa  had  ***.*•  kllla  (Influanea  Unaa) 

Typa  3  ailnaa  had  •**.*•  kllla  (contact  mlnaa) 

Typa  4  mlnaa  had  *•*.**  kllla 
Typa  3  mlnaa  had  •••.••  kllla 
Total  ad.na  kllla  wara  •••*.** 

27 

28  print  2  llnaa  thua 

Rad  Ovarwatchlng  Dlract  Flra  Data 

31  print  3  llnaa  with  R.O. SHOTS,  R.O.KILL  thua 

Rad  fir ad  ♦***.*  dlract  flra  ahota. 

accempllahlnt  ••*.**  kllla  of  blua  taakfotca  vahiclaa. 

35 

36  ratum 

37  and  "OUTPUT 
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1  rPUtlM  R. DIRECT. OVERHAICH  slvan  RO.IO 

2 

3  "THIS  ROUTINE  DETERMINES  WHEN  A  RED  DIRECT  FIRE  EVENT  SBOULD  TAKE  PLACE 
* 

3  d«fln«  RO.ID  an  lnta(ar  vatlabla 
8  dafinn  RATE  aa  a  raal  variabla 

7  dafina  ACQUIRE  aa  a  raal  variabla 

8  dafina  SROT.TIME  aa  a  doubla  variabla 

9  dafina  X,  ¥  aa  raal  varlablaa 

10  * 

11  X  •  R.O.X(RO<RO.ID)) 

12  ¥  •  R.O.¥(RO(RO.IO)) 

13 

1*  If  ORAPB.OM  -  1 

15  ahow  RO(RO.ID)  with  'rotank.len' 

16  lat  location. a(RO(RO. 10))  •  location. t(X,¥) 

17  andlf 

18 

19  If  R.O.STAIUS(RO(RO.ID))  -  1 

20  RATE  -  R.O.BETA(RO(RO.10)) 

21  ACQUIRE  ~  axponantlal.f(.S,  7) 

22  8B0T.TIHE  -  RATE  *  ACQUIRE 

23  andlf 

24 

23  achadula  a  DIRECT. FIRE  (Ivlnc  RO.IO  at  tlma.v  *  SBOT.TIME 
26 

27  ratum 

28 

29  and  "and  R. DIRECT. OVERMATCH 
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1  zoutlna  SET. DISPLAY 

2 

3  ' '  THIS  ROUTIRE  IS  USED  TO  IMITIALIZE  THE  ''VOtLO'  THAT  IS  USED  BY  THE 

4  "GRAPHICS  ROUTIMES  IH  SIMSIAPBICS 

5 

6  dafin*  DISPLAY. DEPTH  aa  a  taal  variabla 

7  daflna  START. PT  aa  a  zaal  vatlabla 

8 

9  DISPLAY. DEPTH  -  HUH. CP  •  CP.IMTERVAL  *  10.0 

10  START.pt  -  -10.0 

11 

12  lat  tlmaaeala.v  •  100 

13  lat  vxtozm.v  •  1 

14  call  aatworld.rC  -(.3  *  DISPLAY. DEPTH),  (.3  *  DISPLAY. DEPTH ) ,  START. PT, 
13  DISPLAY. DEPTH) 

16 

17  ratuzn 

15  and  "SET. DISPLAY 
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1  avant  START  slvan  ID 

2 

3  ' '  THIS  EVEHT  INITIALIZES  THE  MOVEMEHT  OF  IMDIVIDUAL  TASKFORCE  ELEMEHTS 

* 

5  dafina  ID  as  an  Intassr  variabls 

6  dafina  CONVERSION . FACTOR  at  a  taal  varlabla 

7 

8  CONVERSION. FACTGil  •  1000.0/60.0 

9  SFEED(E(ID))  -  E. SPEED  •  CONVERSION . FACTOR 
10 

11  if  ID  -  1 

12  SFEE0(E(ID))  -  E. SPEED. 1  *  CONVERSION. FACTOR 

13  andif 
lA 

15  call  NEXT. ENCOUNTER  givins  ID 

16 

17  raturn 

18  and  "START 
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1  vrmt  STOP. SIM 

2 

3  "USED  TO  STOP  THE  SIMULATION  UNDER  USER  DEFINED  CONDITIONS 

4  "DUMPS  ALL  DATA  TO  OUTPUT  FILE 

5 

6  print  1  lln*  thus 

SIMULATION  halted  du«  to  tloo  •splratlon 
8 

9  call  DATA. DUMP 

10  call  MINE. DUMP 

11  call  OUTPUT 

12 

13  STOP 

14 

13  and  "ovont  STOP. SIM 
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1  routln*  SIMURY 

2 

3  "DATA  mPOT  VALORS  AMD  MODEL  OOTPUTS 

4 

3  define  J  ae  en  intacar  variable 
6 

7  print  3  llnaa  thua 
SUHMRV  DATA 

11 

12  print  9  llnaa  with  MUM.ELEMBHT,  F. PLOWS,  T. PLOWS,  TRACICI,  IRACX2,  IRACX3  thus 
TASKFORCE  SITE 


Total  nuobar  of  alaoMnta  waa  •*** 

Huoibar  of  Full  Plows  -  ••• 

Nuobar  of  Track  Plows  •  *** 

Huofcar  of  Track  Type  1  "  *** 

Nuobar  of  Track  Type  2  •  *** 

Nuobar  of  Track  Type  3  -  *** 

22 

23 

2*  print  3  llnaa  with  E. SPEED. 1,  E. SPEED  thua 
Task fore a  Velocity 

Full  plow  has  a  valoclty  of  ••*.*•*  kph 
Track  type  1  has  a  velocity  of  **•.*••  kph 
26 

29  print  6  llnaa  with  P.MMES,  I.MINES,  C. MINES,  T.MIHES,  and  M.HIHES  thua 
MINE  DATA 

Nuobar  of  Prasaurs  Minas  ■  •••* 

Nuobar  of  Influenca  Hinas  •  **** 

Nuadiac  of  Contact  Minas  ■  **** 

Nuobar  of  Typa  4  Hinas  ■  **** 

Nuobar  of  TjT«  3  Minas  • 

36 

39  print  16  Unas  with  AUA.DENSXTY.Tm.l,  AREA. DENSITY. TYPE. 2, 

40  AREA. DENSITY. TYPE. 3,  AREA. DENSITY. TYPE. 4,  AREA.DEN8ITY.TYPE.S,  AREA. DENSITY, 

41  LINEAR. DENSITY. TYPE. 1,  LIHSAR.0ENSXTY.TYPE.2,  LINEAR. DENSITY. TYPE. 3, 

42  LINEAR. DENSITY. TYPE. 4,  LINEAR. DENSITY. TYPE. 3,  LINEAR. DENSITY  thus 

MIRS  DENSITIES 

AREA  DENSITY 

TYPE  1  MIRES  • 

TYPE  2  MINES  -  aaa.aaa 
TYPE  3  MIRES  • 

TYPE  4  MINES  - 
TYPE  3  MIRES  - 
TOTAL  ALL  MIRES  - 

LINEAR  DBRBITT 
TYPE  1  MINES  - 

TYPE  2  MUSS  -  •*•.•«  r 

TYPE  3  MINIS  -  *•*.*•• 

TYPE  4  MINES  -  aaa.aaa 

TYPE  3  MINES  -  aaa.aaa  ^ 

TOTAL  ALL  MINES  -  aaa.aaa 
61 

62  print  4  Unas  thus 
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Hln*  vs  Vshiels  Fk  Valuss 
Mins  Typs 

Vsh  TypsS  12343 


4 


4 


67 

68  for  J  •  1  to  3 

69  do 

70  print  1  lins  with  J.  MlHE.PKCl.J).  MIHE.PK(2,J).  MINX. FK(3 . J) , 

71  MIin:.PK(4.J),  snd  MIHE.PK(3,J)  thus 


73  loop 

74 

73  print  3  llnss  thus 
RED  OVERHATCH 

TYPE  STATUS  FIRE  RATE  MEAN  ACQ  RATE 


79  for  J  •  1  to  HUM.RED. OVERMATCH 

80  do 

81  print  1  Uns  with  R.O.TYPBCROd)).  R.O.STATUS(RO( J) ) .  R.O.RATE(RO(J) ) , 

82  R.O.BXTA(RO(J)>  thus 

**  **  ***^***  *«*^*** 

84  loop 

83 

86  print  1  11ns  with  HUMBER. OF. RUNS  thus 
Tha  alaulatlon  aads  ***  runs. 

88 

89 

90  print  1  11ns  with  FLOH.HIOTH.l,  PLOH.EFFECT.l  thus 

Tha  full  width  plow  uaad  had  a  width  of  •*•.**  and  an  affaetlvanasa  of  ***.** 
82 

93 

94 

93  print  3  linaa  thus 

SUWIAXy  STATISTICS 
99 

100  print  1  llna  thus 

HINES  MOVED  BY  FLOH 

102 

103  print  2  llnss  with  ICAN. MINE. MOVED  thus 
An  avaraga  of  ainss  wars  dlsplaead  by  tha  plow  sacb  run 

106 

107  print  1  lino  thus 

MINE  KILLS  BY  MINE  TYPE 

109  print  8  Unas  with  WAN. MINE. KILL.  1,  VAR. HIRE. KILL.  1,  WAN. MINE. KILL. 2, 

110  VAR.MINE.KIU.2,  MEAN. NINE. KILL. 3,  VAR.H:RE.KIU.3,  HEAR. MINE. KILL. 4. 

111  VAR.MIRB.K1LL.4,  WAN. MINE. KILL. 3,  VAR. MINX. KILL. 3,  WAN. MINE. KILLS, 
lU  VAR.MINB. KILLS  thus 


Msan  alas  kills  by  typo  1  ainss  was 
Moan  alas  kills  by  typs  2  ainss  was  ***.*• 
Msaa  alas  kills  by  typs  3  alass  was  •••.•• 
Hsm  alaa  kills  by  typs  4  alnas  was 
Msaa  alaa  kills  by  typs  3  alass  was 
Msaa  alaa  kills  for  all  alas  typas  ••M.ao 


wiUi  varlaaes  ••••.** 
with  varlaaes  **••.•* 
with  varlaaes  *•*•.** 
with  varianes  ••••.*• 
with  varianes 
with  varlaaea  **•*.•* 


121 

122  print  1  lino  thus 

DIRICT  FIRX  STATS 
124 
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123  print  7  Un«a  with  MEAN. R.O. SKITS,  VAR.R.O.SBOTS.  tffiAM.R.O.KIU., 

126  VAR.R.O.KILL  thus 

Rsd  dlrsct  flsa  ovsrwatch  flrsd  a  msan  of  »**».»»  with  a  varlanca  of 
****.**  shots  par  run. 

Rad  dlract  flra  ovaiwateh  klllad  a  siaan  of  ***.**  with  a  varlanca  of 
taskforca  vahlclaa  par  run. 

134 

133  print  3  llnaa  with  MEAN . LOSS . RATE ,  VAR. LOSS. RATE  thua  \ 

Tha  saan  taskforca  loss  rata  was  •••*.*•  with  a  varlanca  of  *•*•.** 

139  ratum 

140  and  "SUMMRT 
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1 

2 

3 

4 

5 

6 
7 
6 
9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 
23 
26 

27 

28 

29 

30 

31 

32 

33 

34 

33 

36 

37 
36 

39 

40 

41 

42 

43 

44 
43 

46 

47 
40 
40 
SO 

31 

32 
S3 

34 

33 

36 

37 
30 
30 
00 
61 
62 


routine  UPDATE. LOCATION 

' ' TBIS  ROUTINE  CAUSES  THE  IDENTIFIED  ELEMENT  TO  BE  MOVED  ALONG  ITS 
' '  PREOISIGNATED  MOVDSNT  PATH  A  DISTANCE  DETERMINED  AS  A  FUNCTION 
"OF  TIME  PASSAGE  SINCE  THE  LAST  UPDATE  AND  THE  ELEMENT  VELOCITY. 
"THE  ROUTINE  HORXS  BY  FIRST  DETERMINING  WHAT  PATH  TO  USE,  THEN 
"CALCULATING  THE  COCROINATES  OF  THE  MOVE  RESULT.  THEN  UPDATING 
"THE  POSITION  LOCATION  FIELDS  OF  THE  ELEMENT 

deSin*  ID  u  an  intesar  variable 
define  DISTANCE  aa  a  real  variable 
define  DISTANCE. TO. TRAVEL  aa  a  real  variable 
define  TltC.  PASSAGE  aa  a  doubla  variable 
define  X  aa  a  real  variable 
define  Y  aa  a  real  variable 
define  XI  aa  a  real  variable 
define  Y1  aa  a  raal  variable 
define  X2  aa  a  raal  variable 
define  ¥2  aa  a  raal  variable 
define  MOV. FRACTION  aa  a  raal  variable 


TIME.PASSAIX  -  tliaa.v  -  OLD. TIME 
OLD. TIME  •  tlM.v 

for  ID  -  1  to  RUM. ELEMENT 
do 

"aMko  aura  In  bounda.  If  not,  atop  it. 
If  ELEMENT. y(E(ID))  »  CP(RUM.CP) 

SPEED(E(I0))  •  0 

"update  tlaM  to  traveraa  record 
If  STATVSaaO))  -  l  or  S7aIUS(H(1D»  -  2 
If  (TnC.Or.COMPLETlONdD)  -  0)  and  (TIME.  OF.  DEATH  (ID)  -  0) 
TIia.aP.COMPLETIQH(lD)  •  tlM.v 
endlf 
andlf 
endlf 


' '  alaaiant  Index 
"dlatanea  to  next  cp 
' '  travel  dlatanea 


"delta  X 

to  next 

cp 

"delta  y 

to  next 

cp 

"movement 

In  X 

"movaaient 

in  y 

'  *  almaant  oxivemant 

aa 

"a  fraction  of  dlatanea 
"to  next  checkpoint 

"tine  alnea  laat  update 


If  ((STATUS(B(ID))  •  1)  or  (STATUS(S(ID))  -  2))  "  llvlns  vohlclaa 
If  SPEED(E(I0))  >  0  "that  axe  laovlnc 

"determine  how  far? 

call  DELTA.DISTANCE  olvln«  ID  and  TIME. PASSAGE  yleldln* 

DISTANCE. TO. TRAVEL 


"dotaxmiaa  dlatanea  to  next  checkpoint 
"and  the  delta  x,  delta  j 

call  DISTANCE. TO. CP  BlvlnO  ID  ylaldlno  DISTANCE,  XI.  ¥1 

"eaae  where  element  dlatanea  from 
"ep  ao  amall  Imtacpcetad  aa  0,  make 
"a  very  nail,  but  valid  dlatanea  to 
"prevent  dlvialon  by  0 

If  (DISTANCE  •  0) 

DISTANCE  •  .00001 
andlf 

"eempate  the  fraction  of  the  dlatanea 
"to  the  next  checkpoint  that  the  required 
"move  will  cover 
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63  MOV.PRACTIOH  -  DISTAHCE. TO. TRAVEL  /  DISTAHCE 

6* 

65  ' *  translat*  that  fraction  into  x  and  y 

S6  "oovaaMnt 

67  X2  >  XI  •  HOV. FRACTION 

68  Y2  •  Y1  •  MOV. FRACTION 

69  "and  add  that  novaatant  to  tha  currant 

70  "  alanant  poaltlon 

71  X  -  ELEMENT. X(E(I0))  +  X2 

72  Y  -  ELEMENT. YCECID))  ♦  Y2 

73 

7*  ELEMENT. X(E(ID))  -  X 

73  ELDg»T.Y(E(ID))  -  Y 

76 

77  "sraphlca  on/of  flat 

78  If  GRAPH.ON  -  1 

79  if  ELmENT.TYPECEdD))  -  1 

80  if  P.STATUS(E(10))  -  1 

61  ahow  E<1D)  with  'fWplow. Icn" 

82  andlf 
63 

8*  if  P.3TATUS(EaO))  •  0 

83  aho«  E(10)  with  'xfwplow.ien' 

66  andlf 

67 

86  lat  location. *(E(ID>)  •  location. fCX.Y) 

89  andlf 

90 

91  if  ELEM9IT.TYPE(E(1D))  •  3 

92  ahaw  E(1D)  with  'tankl.lcn' 

93  lat  location. a(E(lD))  •  location. t(X,¥) 

94  andlf 
93 

96  if  EUMENT.TYPECEdO))  •  4 

97  ahow  E(IO)  with  ‘’taak2.1en' 

96  lot  location. a(E(I0))  •  location. f(X,Y> 

99  andlf 

100  andlf 

101 

102  andlf 

103  andlf 

104  loop 
103 

106  ratum 

107  and  "  UPDATE . LOCATION  adltad  3  Sapt  91 
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APPENDIX  D  -  GRAPHIC  ICONS 


This  appendix  contains  diagrams  depicting  the  icons  used  in  the  graphics  portion  of 
the  model.  The  icons  are  included  because  although  the  SIMSCRIPT  code  will  run  on 
a  varied  of  computer  ^tems,  the  SIMGRAPHICS  portion  of  the  code  is  xmique  to  the 
type  of  computer  system  it  was  generated  on.  To  allow  interested  users  the  ability  to 
recreate  the  graphics  on  their  specific  platforms,  the  icons  are  reproduced  here.  The 
text  strings  ending  in  "icn"  at  the  base  of  each  diagram  are  the  file  names  which  the 
program  looks  for  when  using  that  particular  icon.  In  the  cases  where  multiple  text 
strings  appear  beneath  the  icon  (Figure  D-2),  multiple  icons  of  this  shape  are  used, 
each  of  a  different  color.  Any  of  the  icons  may  be  of  any  color  the  user  chooses.  It  is 
suggested  that  the  bottom  row  of  mine  icons  depicted  in  Figure  D-6  be  of  the  same 
color  as  these  icons  are  tised  to  depict  inactive  mines. 

The  "crosshairs”  on  each  icon  diagram  identify  the  center  of  the  icon  which  must  be 
identified  to  the  SIMGRAPHICS  editor  when  constructing  the  icon.  The  measurement 
given  at  the  bottom  of  each  diagram  provides  the  "scale"  of  the  icon  which  must  also 
be  input  to  the  editor  before  the  icon  is  used. 
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3^  Meters  32  Meters 


Figtire  D-:i  MINEFIELD  MODEL  ICONS 
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Figure  D-6  mifBFIELO  HOOEL  ICONS 
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APPENDIX  E  -  EXAMPLE  SINGLE  AVAILABLE  OUTPUTS 


A  large  amovint  of  data  can  be  extracted  from  each  model  iteration  if  desired.  The 
following  is  an  example  of  the  data  that  may  be  recorded  by  the  user  for  each 
iteration. 

DUMP  OF  MIHEFIELO  DATA 


nuB 

MINE 

X 

DATA 

y 

■tatua 

xadtua 

typa 

1 

-38.762, 

82.133 

1 

.10 

1 

2 

67.310, 

79.336 

1 

.10 

1 

3 

-37.463, 

88.430 

1 

.10 

1 

4 

36.123, 

100.301 

1 

.10 

1 

5 

16.748, 

89.338 

1 

.10 

1 

6 

3.149, 

93.032 

1 

.10 

1 

7 

17.030, 

92.072 

1 

.10 

1 

8 

44 . 720 , 

89.041 

1 

.10 

1 

9 

3.003, 

87.634 

1 

.10 

1 

10 

-18.033, 

99.971 

1 

.10 

1 

11 

37.483, 

80 . 681 

1 

.10 

1 

12 

-70.096, 

99.696 

1 

.10 

1 

13 

63.482, 

84.333 

1 

.10 

1 

14 

28.201, 

93.031 

1 

.10 

1 

13 

46.276, 

84.887 

1 

.10 

1 

16 

-64.704, 

96.322 

1 

.10 

1 

17 

20.460, 

97.343 

1 

.10 

1 

18 

38.951, 

88.302 

1 

.10 

1 

19 

-61.047, 

80.087 

1 

.10 

1 

20 

-4.903, 

90.168 

1 

.10 

1 

21 

-46.806, 

86.866 

1 

.10 

1 

22 

-37.831, 

83.363 

1 

.10 

1 

23 

43.318, 

80.772 

1 

.10 

1 

24 

48.826, 

91.667 

1 

.10 

1 

23 

-71.320, 

96.361 

1 

.10 

1 

26 

78.872, 

99.119 

1 

.10 

1 

27 

20.134, 

68.391 

1 

.10 

1 

28 

70.283, 

94.964 

1 

.10 

1 

29 

40.841, 

80.341 

1 

.10 

1 

30 

37.020, 

94.491 

1 

.10 

1 

31 

40.921, 

93.282 

1 

.10 

1 

32 

70.329, 

89.944 

1 

.10 

1 

33 

-82.701, 

101.149 

1 

.10 

1 

34 

33.316, 

99.722 

1 

.10 

1 

33 

36.723, 

84 . 103 

1 

.10 

1 

38 

6.294, 

78.877 

1 

.10 

1 

37 

77.223, 

83.198 

1 

.10 

1 

38 

-64.730, 

88.443 

1 

.10 

1 

30 

-18.030, 

92.074 

1 

.10 

1 

40 

-38.878, 

84.873 

1 

.10 

1 

41 

-36.899, 

82.367 

1 

.10 

1 

42 

13.860, 

93.823 

1 

.10 

1 

43 

12.322, 

86.024 

1 

.10 

1 

44 

-80.383, 

79.724 

1 

.10 

1 

43 

-2.634, 

77.349 

1 

.10 

1 

46 

78.336, 

97.466 

1 

.10 

1 

47 

-80.090, 

81.877 

1 

.10 

1 

48 

40.328, 

81.637 

1 

.10 

1 

48 

-73.864, 

81.713 

1 

.10 

1 

30 

-89.100, 

81.396 

1 

.10 

2 

160 


51 

52 
nvn 

75.536, 

70.348, 

X 

82.485 

88.353 

y 

1 

1 

status 

.10 

.10 

zadlus 

2 

2 

typs 

53 

-80.392, 

99.217 

1 

.10 

2 

5« 

31.496, 

80.909 

1 

.10 

2 

55 

-80.649, 

89.850 

1 

.10 

2 

56 

84.710, 

84 . 882 

1 

.10 

2 

57 

-12.054, 

86.260 

1 

.10 

2 

58 

33.566, 

95.306 

1 

.10 

2 

59 

82.227, 

83.276 

1 

.10 

2 

60 

-27.088, 

81.566 

1 

.10 

2 

61 

-79.012, 

101.078 

1 

.10 

2 

62 

-7.314, 

81.453 

1 

.10 

2 

63 

-56.933, 

93.084 

1 

.10 

2 

64 

39.837, 

78.599 

1 

.10 

2 

65 

-49.200, 

90.353 

1 

.10 

2 

66 

-31.002, 

79.554 

1 

.10 

2 

67 

6.958, 

83.291 

1 

.10 

2 

68 

42.579, 

87.717 

1 

.10 

2 

69 

2.330, 

98.190 

0 

.10 

2 

70 

48.239, 

77.894 

1 

.10 

2 

71 

44.043, 

100.627 

1 

.10 

2 

72 

-32.608, 

96.975 

1 

.10 

2 

73 

6.853, 

83.753 

1 

.10 

2 

74 

-70.743, 

98.137 

1 

.10 

2 

7S 

89.132, 

90 . 333 

1 

.10 

2 

76 

-82.859, 

100.337 

1 

.10 

2 

77 

52.129, 

98.808 

1 

.10 

2 

78 

-2.683, 

97.014 

1 

.10 

2 

79 

26.994, 

84.669 

1 

.10 

2 

80 

82.457, 

97 . 097 

1 

.10 

3 

81 

-37.272, 

86.903 

1 

.10 

3 

82 

4.328, 

93 . 402 

1 

.10 

3 

83 

-23.196, 

78.691 

1 

.10 

3 

84 

5.974, 

100.643 

1 

.10 

3 

85 

77.068, 

99.466 

1 

.10 

3 

88 

81.930, 

101.030 

1 

.10 

3 

87 

-61.883, 

60.103 

1 

.10 

3 

88 

-47.431, 

101.284 

1 

.10 

3 
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Min*  va  Vahiel*  Fk  V*lu*« 

Min*  Typ* 

V*h  Typ*\  123*5 


1 

.05 

.05 

.50 

0. 

0 

2 

.10 

.50 

.70 

0. 

0 

3 

.90 

.90 

.90 

0. 

0 

A 

0. 

0. 

0. 

0. 

0 

5 

0. 

0. 

0. 

0. 

0 

DUMP  OF  VEHICU:  DATA 


ELEMEHT  STATUS  AT 
TIME  -  2.831 


ID 

X 

Y 

SPEED 

STATUS 

TYPE 

1 

0. 

160.00 

0. 

1 

1 

2 

-.27 

160 . 00 

0. 

1 

3 

3 

-.20 

160 . 00 

0. 

1 

3 

A 

.A9 

96.17 

0. 

0 

3 

5 

-.9A 

160.00 

0. 

1 

3 

6 

-.Al 

160.00 

0. 

1 

3 

MOVEMEHT  FLAMS 
ELEMENT  1 


X-CORK 

Y-CORR  SLOPE  INTERCEPT 

0. 

.  0.  .A-l.E+OOS, 

0. 

0. 

.  20.00,>1.E>006, 

20.000 

0. 

,  AO.OO.>1.E')-O06, 

AO. 000 

0. 

,  60.00,n.E'H)06, 

60.000 

0. 

,  SO.OO.aI.Ea-OOS, 

80.000 

0. 

,  loo.oo.n.EAOos, 

100.000 

0. 

,  l20.00,>l.E+006. 

120.000 

0. 

,  lAO.OO.Al.EAOOS, 

lAO.OOO 

0. 

,  160.00,  0. 

0. 

ELEMENT  2 

X-CCMR  Y-COm  SLOPE  IHTEitCEFT 


-.08A, 

0.  , 

-36.0A1, 

-2.302 

-.619, 

20.00, 

17.002, 

30.520 

.358, 

AO. 00, 

-58.507, 

73.179 

.221, 

60.00, 

-AA.127, 

69.773 

-.232, 

80.00, 

29.323, 

86.796 

.A50, 

100.00, 

-52.801, 

123.776 

.072, 

120.00, 

110.876, 

112.063 

.232, 

lAO.OO, 

-38.A33, 

1A8.073 

-.269, 

160.00, 

0. 

0. 

ELEMENT  3 

X-OGRR 

Y-CORR 

SLOPE  INTERCEPT 

-1.283, 

0.  , 

A6.636, 

61.772 

-.855, 

20.00, 

25.619, 

A2.083 

-.081, 

AO. 00, 

-53.198, 

35.705 

-.A57, 

60.00, 

36.018, 

76.AA8 

.088, 

60.00, 

-1A6.6A3, 

9A.073 

-.036, 

100.00, 

36.606, 

101.310 

.511, 

120.00, 

953.300, 

-366.723 

.532, 

lAO.OO, 

-27.263, 

13A.A91 

-.202, 

160.00, 

0. 

0. 
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EUMBHT  4 

X-CCKR  ir-CORR  SUJFS  INTERCEPT 


.228. 

0. 

-15, 

.653, 

3. 

567 

1.050. 

20. 

.00, 

28. 

.428. 

47. 

744 

-.293, 

40. 

.00, 

-2.E+003. 

-464 

.771 

-.305. 

60 

.00, 

20. 

.086, 

66. 

.119 

.691. 

80. 

00, 

-92 

.499. 

143. 

925 

.475, 

100 

.00. 

-26 

.237, 

112. 

.459 

-.287, 

120. 

.00, 

-42, 

.199, 

107. 

871 

-.781, 

140. 

.00, 

34 

.208, 

166 

.045 

-.177. 

160 

.00. 

0 

0 

ELEMENT  S 

X-COftR  y-C(SR  SLOPE  INTERCEPT 


-.209, 

0 

, 

57 

.200, 

11. 

.934 

.141, 

20. 

00, 

62. 

.933, 

11. 

.126 

.459. 

40. 

.00, 

-35. 

104, 

56. 

106 

-.Ill, 

60 

00. 

98 

.160, 

70 

.888 

.093. 

80 

.00, 

-228. 

818, 

101. 

055 

.005, 

100 

.00, 

670. 

.616, 

98. 

.882 

.034, 

120 

.00, 

-45 

640, 

121. 

,573 

-.404, 

140 

00, 

-37. 

.392, 

124 

.903 

-.939, 

160. 

.00, 

0. 

, 

0. 

ELEMENT  6 

x-ccm  y-coRR  slope  intercept 


.206, 

0 

, 

19. 

.616, 

-4. 

.038 

1.225, 

20 

00, 

-24. 

.181, 

49. 

.807 

.398, 

40 

.00, 

-291 

.532, 

155 

.917 

.329, 

60 

00, 

-81. 

747, 

86. 

896 

.084, 

80 

00, 

31 

.156, 

77 

.372 

.726, 

100 

.00, 

-87 

.805, 

*63 

772 

.499, 

120 

.00, 

-22. 

.568, 

131. 

.231 

-.388, 

140 

.00, 

-900. 

910, 

-209. 

.266 

-.410. 

160 

.00, 

0. 

, 

0. 

ELEMENT  STATUS  AT  END  OF  RUN 


NUM 

STATUS 

X 

y 

1 

ALIVE 

0. 

160.000 

2 

ALIVE 

-.269 

160.000 

3 

ALIVE 

-.202 

180.000 

4 

DEAD 

.495 

98.170 

5 

ALIVE 

-.939 

160.000 

6 

ALIVE 

-.410 

160.000 

OBSTACLE  LOCATIONS 


NUM 

X 

y 

RADIUS 

4 

.4947 

98 

.1701 

3.16 

ByPASS  NAPS 

EU 

E-X 

E-T 

ST 

Pl-X 

pi-y 

ST 

P2-X 

P2-y 

SI  Ent-X 

Ent.y 

ST 

1 

0. 

0. 

0 

0. 

0. 

0 

0. 

0. 

0 

0. 

0. 

0 

2 

0. 

0. 

0 

0. 

0. 

0 

0. 

0. 

0 

0. 

0. 

0 

3 

0. 

0. 

0 

0. 

0. 

0 

0. 

0. 

0 

0. 

0. 

0 

4 

0. 

0. 

0 

0. 

0. 

0 

0. 

0. 

0 

0. 

0. 

0 

5 

.04 

91.13 

0 

-5.83 

94.32 

0 

-3.83 

101.82 

1 

.01 

105.75 

0 

6 

.43 

90.90 

0 

-5.83 

94.52 

0 

-5.83 

101.82 

1 

.67 

105.36 

0 
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FULL  WIDTB  PLOWS  BOV*d  4.00  min**. 


MINE  EFFECTS 

Typ*  1  minaa  had 

0. 

kills 

(prassurs  mines) 

Typ*  2  minaa  had 

1.00 

kills 

(influanc*  mines) 

Typ*  3  minaa  had 

0. 

kills 

(contact  mines) 

Typ*  4  minaa  had 

0. 

kills 

Typ*  3  minaa  had 

0. 

kills 

Total  min*  kills 

war* 

1.00 

SIMMRY  DATA  V 

TASKFORCE  SIZE 


Total  numbat  of  alaoant*  «*• 

Nuobar  of  Full  Flow*  •  1 

Nvobar  of  Track  Plow*  •  0 

Nuabar  of  Track  Typ*  1  ~  3 

Hunbar  of  Track  Typ*  2  •  0 

Number  of  Track  Typa  3  -  0 

Taakfore*  Velocity 
Full  plow  haa  a  velocity  of 
Track  typa  1  haa  a  velocity  of  8.000  kph 

MINE  DATA 

Humber  of  Praaaur*  Minaa  -  30 

Hiaabar  of  Influanc*  Minaa  •  30 

Huariiar  of  Contact  Minaa  •  8 

Humber  of  Typ*  4  Mina*  •  0 

Humber  of  Typ*  3  Minaa  0 


6 


6.000  kph 


MIHB  DENSITIES 

AREA  DENSITY 

TYPE  I  MINES  -  .011 

TYPE  2  MINES  •  .007 

TYPE  3  MINES  •  .002 

TYPE  4  MINES  •  0. 

TYPE  3  MINES  -  0. 

TOTAL  ALL  MINES  "  .020 


LINEAR  DENSITY 

TYPE  1  MINES  -  .278 

TYPE  2  HINES  •  .167 

TYPE  3  MINES  •  .044 

TYPE  4  HINES  •  0. 

TYPE  3  HINES  •  0. 

TOTAL  ALL  HINES  •  .480 


Hina  va  Vabicl*  Ik  Value* 


iyp*\ 

1 

Hina  Typ* 

2  3 

4 

1 

.03 

.03 

.30 

0. 

0 

2 

.10 

.30 

.70 

0. 

0 

3 

.00 

.00 

.00 

0. 

0 

4 

0. 

0. 

0. 

0. 

0 

3 

0. 

0. 

0. 

0. 

0 
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Th«  ■loulatlon  mada  1  runt. 

Tha  full  width  plow  uaad  had  a  width  of  4. SO  and  an  affactivanaas  of  1.00 


SIMMRY  STATISTICS 


MINES  MOVED  BY  PLOW 

An  avarasa  of  2. SO  ninaa  wara  diaplacad  by  tha  plow  aach  run 


MINE 

KILLS  BY  MINE  TYPE 

Maan 

mina 

killa 

hy  typa  1  minaa 

was 

0.  , 

with 

vaxianca 

0 

Maan 

oina 

killa 

hy  typa  2  minaa 

was 

1.00. 

with 

vaxianca 

0 

Maan 

nlna 

kill! 

hy  typa  3  minaa 

waa 

0.  . 

with 

vaxianca 

0 

Maan 

nlna 

killa 

by  typa  4  minaa 

was 

0.  , 

with 

vaxianca 

0 

Maan 

oina 

kills 

hy  typa  S  minaa 

was 

0.  , 

with 

vaxianca 

0 

Maan 

nlna 

killa 

fox  all  mina  typaa 

1.00, 

with 

vaxianca 

0 

OISECT  FIRE  STATISTICS 
RED  OVERMATCH 

TYPE  STATUS  FIRE  RATE  MEAN  ACQ  RATE 


1  1  .SOO  .700 

Rad  firad  3.0  diract  flta  ahota. 

aeeoapliahins  0.  killa  of  blua  taakfotca  vahiclaa. 

Rad  dixact  fixa  ovaiwateh  klllad  a  aaan  of  0.  with  a  vaxianca  of  0.  taakforca  vahiclaa  par  run. 
TOTAL  TASKFORCE  LOSSES 

Tha  BMian  taakfoiea  loaa  rata  waa  .17  with  a  vaxianca  of  .00 


I 


a 
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APPENDIX  F  -  EXAMPLE  MULTIPLE  RUN  RESULTS 

The  model  collects  designated  data  throughout  the  course  of  a  data  nm.  Following 
is  an  example  of  one  such  run. 

The  raw  data  columns  consist  of  the  following  data  elements. 

A  as  Iteration  number 
B  =  Mines  Kills 
C  =  Direct  Fire  Kills 
D  »  Total  Kills 

E  s  Mine  Kills  while  bypassing  Obstruction 
F  X  Time  of  Death  for  Vehicle  1  (0  if  survives  breach) 

G  =  Time  of  Death  for  Vehicle  2  (0  if  survives  breach) 

H  =  Time  of  Death  for  Vehicle  3  (0  if  survives  breach) 

I  »  Time  of  Death  for  Vehicle  4  (0  if  survives  breach) 

J  «  Time  of  Death  for  Vehicle  5  (0  if  survives  breach) 

K  *  Time  of  Death  for  Vehicle  6  (0  if  survives  breach) 

L  »  Time  of  Completion  for  Vehicle  1 
M  s  Time  of  Completion  for  last  surviving  vehicle 


MAH  daza 


0  B  £-P  E — E _ S _ a _ I _ 1 _ S _ L _ t] 


1 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

2 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

3 

3 

0 

3 

2 

0. 

0. 

0. 

3.33 

3.80 

3.98 

1.60 

3.90 

4 

1 

0 

1 

0 

0. 

3.17 

0. 

0. 

0. 

0. 

1.60 

4.62 

3 

0 

1 

1 

0 

1.37 

0. 

0. 

0. 

0. 

0. 

0. 

4.72 

6 

3 

1 

4 

1 

1.38 

3.19 

3.39 

0. 

0. 

3.99 

0. 

4.48 

7 

3 

1 

8 

3 

.81 

3.14 

3.38 

3.87 

3.80 

3.99 

0. 

0. 

8 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.36 

9 

1 

0 

1 

0 

0. 

0. 

3.31 

0. 

0. 

0. 

1.80 

4.62 

10 

1 

0 

1 

0 

0. 

0. 

0. 

3.54 

0. 

0. 

1.60 

4.62 

11 

1 

0 

1 

0 

0. 

0. 

0. 

0. 

3.80 

0. 

1.60 

4.62 

12 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.58 

13 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.36 

14 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

15 

2 

1 

3 

2 

.82 

3.18 

3.43 

0. 

0. 

0. 

0. 

4.39 

16 

4 

1 

3 

3 

.83 

3.19 

3.38 

3.38 

3.81 

0. 

0. 

4.67 

17 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

18 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

19 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

20 

4 

0 

4 

3 

0. 

0. 

3.32 

3.38 

3.84 

4.01 

1.60 

3.68 

21 

2 

0 

2 

0 

0. 

3.18 

0. 

0. 

0. 

3.97 

1.60 

4.32 

22 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

23 

1 

2 

3 

0 

1.27 

3.06 

0. 

0. 

0. 

3.98 

0. 

4.44 

24 

4 

0 

4 

3 

0. 

0. 

3.33 

3.84 

3.89 

4.03 

1.60 

3.68 

23 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

26 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.80 

4.38 

27 

1 

0 

1 

0 

0. 

3.19 

0. 

0. 

0. 

0. 

1.60 

4.62 

28 

3 

0 

3 

1 

0. 

0. 

3.30 

3.53 

0. 

4.16 

1.60 

4.41 

29 

3 

0 

3 

2 

0. 

0. 

3.31 

3.34 

3.82 

0. 

1.60 

4.67 
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30 

3 

0 

3 

2 

0. 

3.23 

3.44 

0. 

3.84 

0. 

1.60 

4.57 

31 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

32 

1 

0 

1 

0 

0. 

0. 

3.46 

0. 

0. 

0. 

1.60 

4.36 

33 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

34 

4 

1 

5 

3 

1.12 

0. 

3.32 

3.60 

3.88 

4.16 

0. 

3.73 

35 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

36 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

37 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

38 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

39 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.58 

40 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

41 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

42 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

43 

1 

0 

1 

0 

0. 

3.12 

0. 

0. 

0. 

0. 

1.60 

4.63 

44 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

43 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

46 

1 

0 

1 

0 

0. 

0. 

0. 

0. 

0. 

3.97 

1.60 

4.35 

47 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

48 

1 

0 

1 

0 

0. 

0. 

0. 

3.64 

0. 

0. 

1.60 

4.62 

49 

1 

0 

1 

0 

0. 

0. 

0. 

3.36 

0. 

0. 

1.60 

4.62 

30 

1 

0 

1 

0 

0. 

0. 

0. 

3.60 

0. 

0. 

1.60 

4.62 

31 

2 

1 

3 

1 

1.13 

3.14 

3.41 

0. 

0. 

0. 

0. 

4.61 

32 

4 

0 

4 

3 

0. 

0. 

3.33 

3.36 

3.90 

4.03 

1.60 

3.68 

33 

4 

1 

5 

4 

1.18 

0. 

3.43 

3.63 

3.92 

4.07 

0. 

3.73 

34 

0 

1 

1 

0 

1.30 

0. 

0. 

0. 

0. 

0. 

0. 

4.72 

33 

1 

0 

1 

0 

0. 

0. 

0. 

0. 

0. 

3.96 

1.60 

4.33 

36 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.36 

37 

3 

1 

4 

2 

.76 

3.14 

0. 

0. 

3.80 

4.04 

0. 

4.22 

38 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

39 

1 

0 

1 

0 

0. 

3.06 

0. 

0. 

0. 

0. 

1.60 

4.62 

60 

3 

1 

4 

3 

0. 

3.27 

3.49 

3.73 

3.89 

0. 

1.60 

4.63 

61 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.80 

4.58 

62 

4 

2 

6 

2 

.74 

2.73 

3.48 

3.63 

3.93 

4.14 

0. 

0. 

63 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

64 

2 

0 

2 

1 

.98 

3.26 

0. 

0. 

0. 

0. 

0. 

4.62 

63 

4 

0 

4 

2 

0. 

0. 

3.43 

3.37 

3.80 

4.08 

1.60 

3.68 

66 

1 

0 

1 

0 

0. 

0. 

0. 

3.63 

0. 

0. 

1.60 

4.82 

87 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

66 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

69 

1 

0 

1 

0 

0. 

0. 

0. 

3.33 

0. 

0. 

1.60 

4.62 

70 

3 

0 

3 

2 

0. 

0. 

0. 

3.63 

3.91 

4.07 

1.60 

3.90 

71 

3 

0 

3 

4 

0. 

3.16 

3.33 

3.80 

3.82 

4.02 

1.60 

1.60 

72 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.80 

4.38 

73 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.58 

74 

1 

0 

1 

0 

0. 

0. 

0. 

0. 

0. 

3.99 

1.80 

4.33 

73 

1 

0 

1 

0 

0. 

3.06 

0. 

0. 

0. 

0. 

1.60 

4.62 

76 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.36 

77 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.80 

4.36 

78 

2 

1 

3 

1 

.78 

3.21 

0. 

0. 

0. 

4.10 

0. 

4.44 

79 

2 

0 

2 

1 

0. 

0. 

0. 

0. 

3.73 

3.99 

1.60 

4.13 

80 

1 

0 

1 

0 

0. 

0. 

3.39 

0. 

0. 

0. 

1.60 

4.35 

81 

2 

0 

2 

1 

0. 

3.10 

3.42 

0. 

0. 

0. 

1.80 

4.63 

82 

2 

1 

3 

1 

.86 

3.28 

3.40 

0. 

0. 

0. 

0. 

4.39 

83 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

84 

3 

0 

5 

4 

0. 

3.23 

3.44 

3.67 

3.86 

4.11 

1.60 

1.60 

83 

1 

1 

2 

0 

0. 

3.34 

0. 

0. 

0. 

3.96 

1.60 

4.44 

88 

0 

1 

1 

0 

1.28 

0. 

0. 

0. 

0. 

0. 

0. 

4.63 

87 

2 

1 

3 

2 

1.11 

3.21 

3.48 

0. 

0. 

0. 

0. 

4.84 

88 

1 

1 

2 

1 

1.03 

3.22 

0. 

0. 

0. 

0. 

0. 

4.62 

69 

3 

0 

3 

2 

0. 

0. 

3.28 

3.36 

3.86 

0. 

1.60 

4.69 

90 

0 

0 

0 

0 

0. 

0. 

0. 

0. 

0. 

0. 

1.60 

4.38 

91 

1 

0 

1 

0 

0. 

3.23 

0. 

0. 

0. 

0. 

1.60 

4.62 

92 

3 

1 

4 

2 

.73 

0. 

0. 

3.86 

3.97 

4.11 

0. 

3.96 

93 

1 

0 

1 

0 

0. 

0. 

0. 

0. 

3.89 

0. 

1.60 

4.62 

94 

3 

0 

3 

2 

0. 

0. 

0. 

3.33 

3.75 

4.00 

1.60 

3.90 

93 

3 

1 

4 

2 

1.36 

0. 

3.33 

0. 

3.90 

4.04 

0. 

4.24 

96 

4 

1 

3 

4 

1.13 

0. 

3.44 

3.62 

3.83 

3.93 

0. 

3.72 
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SlMURy  DATA 


TASKFORCE  SIZE 

Total  nunbtr  of  elements  was  6 
Number  of  Full  Flows  “  1 

Number  of  Track  Flows  ~  0 

Number  of  Track  Type  1  ■  S 

Number  of  Track  Type  2  ”  0 

Number  of  Track  Type  3  •  0 

Taskforce  Velocity 

Full  plow  has  a  velocity  of  6.000  kph 
Track  type  1  has  a  velocity  of  8.000  kph 

MINE  DATA 

Number  of  Pressure  Mines  ~  SO 
Number  of  Influence  Mines  •  30 

Number  of  Contact  Mines  •  8 

Number  of  Type  4  Mines  ~  0 

Number  of  Type  S  Mines  «  0 


MINE  DENSITIES 


AREA  DENSITY 


TYPE  1  MINES 

-  .011 

TYPE  2  MINES 

-  .007 

TYPE  3  MINES 

-  .002 

TYPE  4  MINES 

-  0. 

TYPE  S  MINES 

-  0. 

TOTAL  ALL  MINES 

•  .020 

LINEAR  DENSITY 

TYPE  1  MINES 

•  .278 

TYPE  2  MINES 

-  .167 

TYPE  3  MIKES 

»  .044 

TYPE  4  MINES 

-  0. 

TYPE  S  MINES 

•  0. 

TOTAL  ALL  MINES 

-  .489 

Hin« 

vs  Vehicle  Fk 

Values 

Mina  Type 

V«h  Typ«\  1 

2  3 

4 

3 

1  .03 

.03  .SO 

0. 

0. 

2  .10 

.30  .70 

0. 

0. 

3  .90 

.90  .90 

0. 

0. 

4  0. 

0.  0. 

0. 

0. 

5  0. 

0.  0. 

0. 

0. 

RED  OVERHATCH 

TYPE  STATUS 

PIKE  RATE 

MEAN  ACQ  RATE 

1  1 

.300 

.700 

The  slsHlatlan  mads  120  runs. 

The  full  width  plow  used  had  e  width  of  4. SO  and  an  effectiveness  of 
Sa»fWir  STATISTICS 


MlinES  MOVED  ST  FLOH 

An  avsrasa  of  1.18  mines  were  displaced  by  the  plow  each  run 


1.00 
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Him  KILLS  BY  Him  TYPE 


M««n 

mine 

kills  by  type 

1 

mines 

was 

.70, 

With 

variance 

.90 

M««n 

nine  kills  by 

type 

2 

mines 

was 

.29. 

with 

variance 

.28 

Moan 

mine 

kills  by 

type 

3 

mines 

was 

.19. 

with 

variance 

.18 

Mean 

nine 

kills  by 

type 

4 

mines 

was 

0.  . 

with 

variance 

0. 

Mean 

mine 

kills  by 

type 

5 

mines 

was 

0.  . 

with 

variance 

0. 

Mean 

mine 

kills  for  all 

mine  types 

1.06. 

with 

variance 

1.52 

DIRECT  FIRE  STATS 

R«d  dlract  tizt  ovarwateh  flrad  a  naan  of  1.19  with  a  varlanca  of 
1.17  Shota  par  tun. 

Rad  diract  lira  ovarwatch  klllad  a  naan  of  .20  with  a  variance  of 
.19  taskfotca  vahlclai  pat  run. 


The  naan  taskforce  loss  rata  was  1.26  with  a  variance  of  .60 
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